Re: How convert "historic" STCK to local time?

[Mike Schwab]

> on 02/29/2012
>   at 12:26 PM, John Gilmore  said:
>
>>Barry Merrill is of course politically entitled to his view.
>>Equally, he is entitled to the view that the earth is flat.  The
>>warrant for both is much the same.
>
http://en.wikipedia.org/wiki/The_Blue_Marble
-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Why _TZ put times 7 minutes off?

[Mike Schwab]

Are you comparing your results to the time in the system console?

On Fri, Mar 2, 2012 at 3:33 PM, Charles Mills  wrote:
> Sorry if people feel that times have been beaten to death.
>
> Environment is started task.
>
> In accordance with an earlier thread I am setting _TZ to 'EST5EDT' rather
> than the configured null so that strftime("%z") works as expected.
>
> I just discovered that that is throwing my local times off by 7 minutes.
> Does that make ANY sense to anyone?
>
> The times in question are coming from the following logic:
>
>    tm* tmStruct;
>    struct timeb timebuffer;
>    ftime(&timebuffer);
>   tmStruct = localtime(&timebuffer.time);
>
> I use ftime because I am also using the milliseconds. (I have a exactly the
> same problem with times derived from STCK, so the ftime is not the problem.)
>
> Initially the times are correct. However, after I issue
>
> int seRes = setenv("_TZ", "EST5EDT", 1);
>
>  the times are off by exactly seven minutes. (Result time 7 minutes later or
> greater than actual.)
>
> Does that make sense to anyone? Any clues?
>
> Charles

-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Customer Service, the good and the bad...

[Mike Schwab]

Last entry on the first page:

> http://en.community.dell.com/support-forums/laptop/f/3518/t/19353745.aspx

>I have an XPS 17 with the same USB 3.0 Controler (resenas), and i have the 
>problem with an external hard drive Verbatim 500 Go USB 3.0.

>With the default drivers (v2.0.4.0) when I connect the hard drive on usb 3 
>plug it doesn't work, but it's ok on lateral usb 2 plug.

>If I plug an usb 2 device on the usb 3 controler, it's ok.

>I have contacted Verbatim support for this problem, and they said that there's 
>a problem with the resenas drivers v2.0.4.0, and the solution is to install 
>old resenas drivers v1.0.20.0.

>I try this solution and effectively with this old drivers my USB 3.0 hard 
>drive work correctly on USB 3.0.

Looks like a bad driver update.

On Sat, Mar 3, 2012 at 6:23 PM, Stephen Mednick  wrote:
> I understand your frustrations with HP but Dell aren't much better!
>
> Take a read of the following thread about the poor souls who have been
> experiencing USB 3 problems with their XPS 15/17 laptops. The thread goes
> for 68 pages and was started in  November 2010. And Dell still hasn't
> rectified the problem.
>
> http://en.community.dell.com/support-forums/laptop/f/3518/t/19353745.aspx
>
> Fortunately I stumbled on the thread during my research into buying a new
> Dell laptop.
>
>
> Stephen Mednick
> Computer Supervisory Services
> Sydney, Australia
>
> Asia/Pacific representatives for:
> Innovation Data Processing, Inc.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Why _TZ put times 7 minutes off?

[Mike Schwab]

One guy compiled Hercules to run on Arm processors and he installed it
on about 30-50 Network Attached Storage devices (hard drives with a
ethernet port).

On Mon, Mar 5, 2012 at 3:47 PM, McKown, John
 wrote:
> There are definitely z OS's running on Intel, using Hercules/390. I am sure 
> of MVT, VS1, VM/370, DOS (some version) and z/Linux. I've even heard that 
> there is a 31 bit version MVS 3.8j, called MVS/380. But, supposedly, no z/OS, 
> z/VM, or VSE.
>
> John McKown
> Systems Engineer IV

-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: The Trainer's Friend goes Kindle - and you don't need to own a Kindle!

[Mike Schwab]

On Mon, Mar 5, 2012 at 3:56 PM, Steve Comstock  wrote:
>
> Well, maybe one or two more papers, then I'd like to try
> putting a course up. For courses, we'll probably package
> just one or two chapters per book so people can buy just
> the parts they want / need. Still debating amongst ourselves
> about whether any courses we put out will have labs or not.
>
> Not sure what content to put up first; happy to take suggestions.
>

Anything that can run on Turnkey Hercules MVS 3.8 or z390.org?
Then follow up text only for later changes?

-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: FICON channel ulitization

[Mike Schwab]

If the receiving switch is 4G, that is the maximum transmission rate
from the 8G channel.
It was busy 100% at 4G.

On Tue, Mar 6, 2012 at 1:29 PM, R.S.  wrote:
> The following scenario:
> z196 with FICON Express8S interfaces. Single (only one) channel attached to
> EMC DMX3 CU via 4Gbps switch.
> Some test jobs submitted (ADRDSSU).
> During the test 100% channel utilization was observed.
>
> Q: How it's possible? Neither switch, nor CU would allow more than 50% of
> bandwidth utilisation, since both are 4Gbps rated.
>
> --
> Radoslaw Skorupka
> Lodz, Poland

-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Customer Service, the good and the bad...

[Mike Schwab]

Abbreviate F*** THIS or F***DISK to FDISK to clear up the installed
but uninstallable crapware they give you.  Even the uninstalled stuff
usually makes your machine run slow, so start fresh.  Usually used
right out of the box.  And if it runs with the windows stuff, the add
on stuff probably does not work as well.

And why was your BIOS and other software not patched with all latest fixes?

On Tue, Mar 6, 2012 at 1:55 PM, Dale Miller  wrote:
> When my wife's windoze machine neared end-of-life, we bought her a new HP
> laptop. I had to spend a lot of time fixing problems my wife encountered
> because of HP's tactic of pasting HP-specific crud on top of windoze, but
> eventually, we got things working in an understandable way. But then ...  On
> the day after the warranty expired, the internet connection through my
> wireless router would not come up. I pursued all the help pages and Google
> and eventually discovered that the light (on the F12 key) signifying power
> status to the wireless adapter was amber rather than blue. HP FAQ's and
> Google hits indicated that I should just press the F12 key, but to no avail.
> When I contacted HP, I was told that I would have to pay for support on a
> time-used basis or get a contract for $59. I paid the $59 and was connected
> to a lady for whom English was a second language. She knew immediately what
> the problem was and instructed me to delete and rebuild one of the programs
> that was part of the afore-mentioned overlay of HP crud, and then to
> download an updated BIOS from HP's site.
> What really bothers me about this is:
> 1) The problem's emergence on the first day of non-warranty status.
> 2) The fact that the problem is obviously with HP software (or perhaps
> manufacturing processes related to software).
> 3) The fact that support knew all about the problem, but it was not in the
> FAQ's, or at least not recognizable by the symptoms I experienced.
> 4) That I had to pay to discover HP's defect.
>
> Dale Miller

-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: FICON channel ulitization

[Mike Schwab]

No.  You are dealing with one device and no intermediate device to
buffer the transmission rates.  Transmission rate is negotiated to the
fastest rate that both ends support.

Both ends are transmitting at that same rate, and are busy for the
same amount of time.

In contrast, say you were downloading over the internet through
several devices.  The source could send the file at full speed, but is
buffered by a device in the middle.  It is relaying the data at a
slower rate over a slower link to you.

On Tue, Mar 6, 2012 at 3:12 PM, R.S.  wrote:
> W dniu 2012-03-06 21:33, Mike Schwab pisze: > If the receiving switch is 4G,
> that is the maximum transmission rate > from the 8G channel. > It was busy
> 100% at 4G. I think I understand it now. So, chpid connected to 8G sfp on
> the  switch, then to 4G CU would show 50% utilization? Radoslaw Skorupka
> Lodz, Poland
-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: HSM Recall Failure

[Mike Schwab]

Q:  Was this an EAV volume (more than 64K cylinders)?

At the time of backup, if the database crossed a number of cylinder
line where the x'' rolled over into the x'CCC' in x'CCChrr'
(formerly c'CCHHR') value, then the ADRDSSU backup may be incomplete.
At 128K, 196K (1st version), 256K, 320K, 384K, 448K, 512K, ..., 1024K
(2nd version) number of cylinders.

http://www14.software.ibm.com/support/customercare/sas/f/redAlerts/20120307.html

Apply ++APAR for OA38942

On Fri, Mar 9, 2012 at 7:33 AM, Buckton, T. (Theo)  wrote:
> Still sitting with this problem.
>
> It seems like this is neither a HSM or a VVDS size issue. The space in the 
> SMS pool is also sufficient to this huge data set. It seems more like a 
> ADRDSSU issue. A restore with a rename for a similar data set was attempted, 
> and the results were the same:
>
> RESTORE INDD(TAPEIN) -
>      DS(INCL( -
>            PNGG00.CSPACK.CSDITB.**, -
>               )) -
>  RENAMEU (  -
>        (PNGG00.CSPACK.CSDITB.**,QNGG00.WSPACK.CSDITB.**), -
>    ) CATALOG SPHERE
>  ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'RESTORE '
>  ADR109I (R/I)-RI01 (01), 2012.069 14:38:00 INITIAL SCAN OF USER CONTROL 
> STATEMENTS COMPLETED
>  ADR016I (001)-PRIME(01), RACF LOGGING OPTION IN EFFECT FOR THIS TASK
> 0ADR006I (001)-STEND(01), 2012.069 14:38:00 EXECUTION BEGINS
> 0ADR780I (001)-TDDS (01), THE INPUT DUMP DATA SET BEING PROCESSED IS IN 
> LOGICAL DATA SET FORMAT AND WAS CREATED BY DFSMSDSS VERSION
>                          1 RELEASE 12 MODIFICATION LEVEL 0 ON 2012.061 
> 14:10:03
> 0ADR711I (001)-NEWDS(01), DATA SET PNGG00.CSPACK.CSDITB.D0.KS250 HAS BEEN 
> ALLOCATED WITH NEWNAME QNGG00.WSPACK.CSDITB.D0.KS250 USING
>                          STORCLAS B2B26, DATACLAS @KS250, AND MGMTCLAS @939R
> 0ADR788I (001)-TDUNL(01), PROCESSING COMPLETED FOR CLUSTER 
> PNGG00.CSPACK.CSDITB.D0.KS250, 30109794 RECORD(S) PROCESSED
> 0ADR477E (001)-TDRF1(01), VVDS/VVR/CELL ERRORS ENCOUNTERED FOR CLUSTER 
> PNGG00.CSPACK.CSDITB.D0.KS250
> 0ADR417W (001)-TDRF1(05), COPY/RESTORE OF DATA SET 
> PNGG00.CSPACK.CSDITB.D0.KS250 IS INCOMPLETE, 05
> 0ADR415W (001)-TDLOG(01), NO DATA SETS WERE COPIED, DUMPED, OR RESTORED FROM 
> ANY VOLUME
> 0ADR480W (001)-TDLOG(01), THE FOLLOWING DATA SETS WERE NOT PROCESSED FROM THE 
> LOGICALLY FORMATTED DUMP TAPE DUE TO ERRORS:
> 0                          PNGG00.CSPACK.CSDITB.D0.KS250
> 0ADR006I (001)-STEND(02), 2012.069 14:50:23 EXECUTION ENDS
> 0ADR013I (001)-CLTSK(01), 2012.069 14:50:23 TASK COMPLETED WITH RETURN CODE 
> 0008
> 0ADR012I (SCH)-DSSU (01), 2012.069 14:50:23 DFSMSDSS PROCESSING COMPLETE. 
> HIGHEST RETURN CODE IS 0008 FROM:
>                          TASK    001
>
> Any suggestions... :(

-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: MIGRATING A ML0 VOLUME - CLARIFICATION

[Mike Schwab]

A non zero days would migrate to ML1 according to normal rules.  Then
follow with a zero days command to clear the primary volume.

On Mon, Mar 12, 2012 at 7:24 AM, willie bunter  wrote:
> Good Day To All Readers
>
> I issued the following command HSEND MIGRATE VOLUME(SMR101) DAYS(0)  thinking 
> that it would migrate the dsns to ML1 or ML2.  However I noticed that the 
> dsns were migrated to other ML0 volumes.  Was I wrong in thinking that?
>
-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: MIGRATING A ML0 VOLUME - CLARIFICATION

[Mike Schwab]

The FREEVOL is ignoring the targetlevel.  Once the datasets are on
other ML1 volumes, the ML2 -> ML2 will migrate the datasets on that
volume using its rules.

On Mon, Mar 12, 2012 at 7:52 AM, willie bunter  wrote:
> I noticed that when I tried to migrate ML1 to ML2 - HSEND FREEVOL 
> MVOL(MVS001) TARGETLEVEL(ML2)-
>  it is not migrating the dsns to ML2 but to other ML1 volumes
>
> Would anybody know why?
-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: IEFBR14

[Mike Schwab]

On Tue, Mar 13, 2012 at 7:19 AM, Paul Gilmartin  wrote:

> I suppose the same could be achieved for CKD data sets by
> maintaining a bitmap of used tracks, which would add only
> .00025% overhead to the size of a data set.
>
> -- gil

You have the VTOCIX free space map, one bit per track.  How about
adding a track written map, one bit per track.

After implementing the PTF, a VTOCIX with a free space map but without
a track written map would copy the free space map to the track written
map, assuming all allocated tracks have been written on.  Releasing
space sets the bit to not written on.  Allocating space would retain
the not written on bit.  Reading the track would be blocked, as if
there were no records on the track.  Writing a record on the track
would change the bit to written on, to allow subsequent reads.

A delayed erase could be attempted also.  When you release the space,
go ahead and set the free space indicator, but not the track written
on bit.  A low priority task scans each volume's the free space table
and track written tables.  If free but track written on, write a null
value full track record and set the track as not written.  If you
allocate the space, set both the allocated and not written bits to
bypass the erase but block the read.

-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Server time Protocol and CICS

[Mike Schwab]

How about a parameter that specifies when to perform the check, say
CHECKTIME=020001 (unless your time zone changes at a different time)?

On Tue, Mar 13, 2012 at 7:42 AM, Paul Gilmartin  wrote:
> On Tue, 13 Mar 2012 11:46:39 +, Jousma, David wrote:
>
>>I just read about that.  Not sure it is too helpful, unless I am 
>>mis-understanding it?   Time changes at 02:00 local time, based on what I 
>>read, the CICS clock would be off for the next 22 hours until the next local 
>>midnight?:
>>
>>AUTORESETTIME
>>The AUTORESETTIME parameter specifies the action CICS should take if, at the 
>>next local midnight, the CICS time-of-day differs from the system time-of-day 
>>by more than 30 minutes; for example, setting clocks forward or back to 
>>adjust for summer and winter time.
>>
>>AUTORESETTIME={NO|YES}
>>Valid values are as follows:
>>NO
>>CICS issues message DFHAP1500 to indicate that a CEMT PERFORM RESET command 
>>is required to synchronize the CICS time-of-day with the system time-of-day.
>>YES
>>CICS issues a PERFORM RESET command to synchronize the CICS time-of-day with 
>>the system time-of-day
>>Note: Setting clocks back might cause end-of-day statistics to be written 
>>twice.
>>
> Sigh.  Sounds like a powerful argument for performing the RESET
> instantaneously instead of at midnight.  Or the customer's using
> auto ops to issue the RESET command every day at 01:01 and 02:01.
>
> Why does CICS even have its own time-of-day when there's a perfectly
> good system time-of-day it could use?  Simpler is better.  And why a
> 30 minute fuzz?  One second should be enough to trigger a RESET.
>
> -- gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Sending AFP over NDM

[Mike Schwab]

Does it print a lot of @ symbols?  That would be the printer is set to
ASCII and you are sending EBCDIC.

On Tue, Mar 13, 2012 at 10:59 AM, Henke, George  wrote:
> Having compatibility issues.  Print is corrupted.
>
> Any ideas?
-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Error Message ARC0744E MCDS COULD NOT BE BACKED UP, RC=0036

[Mike Schwab]

Given 10 extents, you might defrag the datasets or the volumes to
reduce the extent counts.  Does not help this situation, but if it was
maxed out with 16 extents, you would be facing a problem.

On Thu, Mar 15, 2012 at 8:28 AM, George Rodriguez
 wrote:

>  Storage class  . . . : **None**        Allocated extents . : 10

-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Error Message ARC0744E MCDS COULD NOT BE BACKED UP, RC=0036

[Mike Schwab]

No.  It would skip any backup files being used.

On Thu, Mar 15, 2012 at 9:42 AM, George Rodriguez
 wrote:
> I'm assuming DFSMShsm needs to be down to defrag the volumes, correct?
> *
> *
> *George Rodriguez*
> *Specialist II - IT Solutions*
> *Application Support / Quality Assurance*
> *PX - 47652*
> *(561) 357-7652 (office)*
> *(561) 707-3496 (mobile)*
> *School District of Palm Beach County*
> *3348 Forest Hill Blvd.*
> *Room B-251*
> *West Palm Beach, FL. 33406-5869*
> *Florida's Only A-Rated Urban District For Seven Consecutive Years*
>
>
>
> On Thu, Mar 15, 2012 at 10:34 AM, Mike Schwab wrote:
>
>> Given 10 extents, you might defrag the datasets or the volumes to
>> reduce the extent counts.  Does not help this situation, but if it was
>> maxed out with 16 extents, you would be facing a problem.
>>
>> On Thu, Mar 15, 2012 at 8:28 AM, George Rodriguez
>>  wrote:
>> 
>> >  Storage class  . . . : **None**        Allocated extents . : 10
>> 
>> --
>> 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...@bama.ua.edu with the message: INFO IBM-MAIN
>>
>
> Home of Florida's first LEED Gold Certified School
>
> Under Florida law, e-mail addresses are public records. If you do not want 
> your e-mail address
> released in response to a public records request, do not send electronic mail 
> to this entity.
> Instead, contact this office by phone or in writing.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: ISPF abendS138 reas2470003

[Mike Schwab]

This 
http://publib.boulder.ibm.com/infocenter/zos/v1r12/index.jsp?topic=%2Fcom.ibm.zos.r12.ieav200%2Fenqsum.htm
looks like a good place start analyzing what was going on.  Maybe not
this particular page, but lots of other topic in the same manual
should be very useful.

On Thu, Mar 15, 2012 at 11:14 AM, af dc  wrote:
> Hello,
> can anyone tell me where I can find the explanation for the following ispf
> reason code ??
>
>     * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
>     * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
>     * *               ISPF processor ended abnormally               * *
>     * *                                                             * *
>     * *          System abend code        138                       * *
>     * *                       Reason code 2470003                   * *
>     * *                                                             * *
>     * *                                                             * *
>     * *                                                             * *
>     * *  Note: The ABEND and REASON codes displayed above are       * *
>     * *        HEXADECIMAL values for "SYSTEM" abends and DECIMAL   * *
>     * *        values for "USER" abends.                            * *
>     * *                                                             * *
>     * *  Enter HELP command for list of common ABEND codes.         * *
>     * *  Press ENTER key for additional DIAGNOSTIC information.     * *
>     * *  Enter END command to display primary option menu.          * *
>     * *                                                             * *
>     * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
>     * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
>
> S138 stands for:
> S138-The error occurred during the execution of an ENQ macro. Two ENQ
> macros were issued for the same resource in the same task without an
> intervening DEQ macro. The second ENQ macro did not specify test, use, or
> have in its RET operand.
> Now about the reason code,  witch manual is it explained ??
>
> Thx in advance, A.CEcilio
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Totally offtopic, sorry, almost choked laughing.

[Mike Schwab]

Airplane! did a good Staying Alive dance.
http://www.youtube.com/watch?v=xLQWPgQMHhQ

On Mon, Mar 19, 2012 at 11:38 AM, McKown, John
 wrote:
> Yes. I kept getting a John Travolta "Saturday Night Fever" overlay in my 
> sight and couldn't stop laughing. Sorry for the off-topic.
>
> --
> John McKown

-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: DASD Mod9/Mod54

[Mike Schwab]

With more data on each volume, your accesses to the single VTOC may
delay accessing the datasets.  When you had that data on Mod 9s, there
were 7 VTOCs to access that much data.

On Tue, Mar 20, 2012 at 8:46 PM, Ron Hawkins  wrote:
> Bob,
>
> Then I can tell you that apart from the flattening of IO that I described,
> there is nothing in the design and architecture of the USP-V that would make
> a 3390-54 have less performance than 16 or so 3390-3 allocated on the same
> parity group.
>
> I'm afraid that it is the nature of your IO and not the size of the volume.
>
> What are you seeing in the ESS stats for the Parity groups?
>
> Ron
>
>> -Original Message-
>> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
>> Behalf Of Lester, Bob
>> Sent: Tuesday, March 20, 2012 6:51 AM
>> To: IBM-MAIN@bama.ua.edu
>> Subject: Re: [IBM-MAIN] DASD Mod9/Mod54
>>
>> Hi Kees,
>>
>>      Hitachi USPV.  Very little IOSQ time, so no PAV.  Looks like mostly
>> disconnect time.
>>
>> Thanks!
>> BobL
>>
>> -Original Message-
>> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
>> Behalf Of Vernooij, CP - SPLXM
>> Sent: Tuesday, March 20, 2012 2:02 AM
>> To: IBM-MAIN@bama.ua.edu
>> Subject: Re: DASD Mod9/Mod54
>>
>> "Lester, Bob"  wrote in message
>> news:<8F672BE771329649A9EB59C7D9D6A2D9521E8B40@den-
>> xmail01.den.OFI.com>.
>> ..
>> > Hi Folks,
>> >
>> >      With todays' modern disk arrays, is there any reason (z/OS based
>> or other) that response time for my Mod54s is consistently higher than for
>> my Mod9s?
>> >
>> >      Assume identical workload against each, single array with
>> multiple LCUs.  RMF says the LCUs are pretty well balanced.  Single image.
>> Pretty simple setup.
>> >
>> >      Thoughts?
>> >
>> > Thanks!
>> > BobL
>> >
>>
>> Which storage device?
>> Do you use PAV / Hyperpav?
>>
>> Kees.
>> 
>> For information, services and offers, please visit our web site:
>> http://www.klm.com. This e-mail and any attachment may contain
>> confidential and privileged material intended for the addressee only. If
> you
>> are not the addressee, you are notified that no part of the e-mail or any
>> attachment may be disclosed, copied or distributed, and that any other
>> action related to this e-mail or attachment is strictly prohibited, and
> may be
>> unlawful. If you have received this e-mail by error, please notify the
> sender
>> immediately by return e-mail, and delete this message.
>>
>> Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its
>> employees shall not be liable for the incorrect or incomplete transmission
> of
>> this e-mail or any attachments, nor responsible for any delay in receipt.
>> Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch
>> Airlines) is registered in Amstelveen, The Netherlands, with registered
>> number 33014286
>> 
>>
>>
>> --
>> For IBM-MAIN subscribe / signoff / archive access instructions, send email
> to
>> lists...@bama.ua.edu with the message: INFO IBM-MAIN
>>
>>
>>
>> mailgate3.oppenheimerfunds.com made the following annotations
>> -
>> This e-mail transmission may contain information that is proprietary,
>> privileged and/or confidential and is intended exclusively for the
> person(s) to
>> whom it is addressed. Any use, copying, retention or disclosure by any
>> person other than the intended recipient or the intended recipient's
>> designees is strictly prohibited. If you are not the intended recipient or
> their
>> designee, please notify the sender immediately by return e-mail and delete
>> all copies. OppenheimerFunds may, at its sole discretion, monitor, review,
>> retain and/or disclose the content of all email communications.
>> -
>>
>> --
>> For IBM-MAIN subscribe / signoff / archive access instructions, send email
> to
>> lists...@bama.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: UNABLE TO DELETE DUPLICTE DSN

[Mike Schwab]

I have had luck using TSO ISMF Dataset.
Enter the DSN and volume.
Enter a D on the display DSN line.
It should detect if it is uncataloged or an additional volume to the
cataloged dataset.
It will give you a warning and reply as directed to continue.

On Thu, Mar 22, 2012 at 8:24 AM, John Dawes  wrote:
> G'Day
>
> I am trying to delete a duplicate dsn via TSO.  Since the cataloged version 
> which resides on volume MPR003 is in use, I thought that I could rename the 
> duplicate dsn which resides on MPR027.  However when I try to rename the dsn 
> (via TSO) it gave me the message "Duplicate data set name" followed by
> "Data set is cataloged on a volume other than MPR027".  Both volumes are 
> managed by SMS.  Is there some other tactic I could employ?
>
> Thanks.

-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Grace Hopper Stories!! (was RE: Pre-Friday fun: Halon dumps and POK Resets)

[Mike Schwab]

On Mon, Mar 26, 2012 at 8:16 AM, Jeff Holst  wrote:

> When she eventually reached flag rank, she selected the Jolly Roger as her 
> personal flag.
>
> Jeff Holst
>
Kind of like the crew of the diesel sub U.S.S. Stingray?

http://www.imdb.com/media/rm3566640640/tt0116130

-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: A z/OS Redbook Corrected - just about!

[Mike Schwab]

Since they have AIX on Power, how about zIX or MIX.  One concern I
have is an operating system name without z/OS implies a completely
independent operating system, not a subsystem of z/OS.

On Mon, Mar 26, 2012 at 9:34 PM, J R  wrote:
> I agree, why not zUnix?  Or z/Unix?
>
> However, since Lynn Wheeler has reminded us that z/OS Unix is (to some 
> degree) POSIX compliant/compatible, why not adopt a catchy contraction of 
> "POSIX"?
>
> I'd like to suggest z/POX, which also connotes the blight it has become on 
> z/OS.  ;-)  ...
>  > Date: Mon, 26 Mar 2012 10:16:32 -0700
>> From: dickbond...@gmail.com
>> Subject: Re: A z/OS Redbook Corrected - just about!
>> To: IBM-MAIN@bama.ua.edu
>>
>> I agree with Chris Mason.   IBM should have never started called it USS -
>> how about a simple definitive abbreviation, like "zUnix".  IBM adores
>> putting a "z" in front of everything (for some clueless reason) so why
>> should their version of Unix be any different?
>>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Grace Hopper Stories!! (was RE: Pre-Friday fun: Halon dumps and POK Resets)

[Mike Schwab]

They have the 12 inch ruler with mm on the other side, flip side sould
be scaled with nano seconds speed of light, and speed of sound
http://en.wikipedia.org/wiki/Speed_of_sound is 340 m/s so .34m oer
340mm is 0.001 Mach-second (13.38 inches)

But speed of sound depends on medium.  And second depends on human
based time keeping.  Just like in the movie Contact, what would
someone from another planet recognize as a base unit of measurement?

How about a ruler based on Hydrogen?  http://en.wikipedia.org/wiki/Hydrogen
A scale based upon a 10^9 multiple of a hydrogen wavelength
(unfortunately there are several).

It also lists a Covalent radius 31±5 pm (31 picometers = 3.1 × 10-11
meters) (3.1 cm = 1 million Hydrogen covalent bonds)

On Tue, Mar 27, 2012 at 9:06 AM, John Gilmore
 wrote:
> I like zMan's idea for a two-sided--nanosecond and millimeter--ruler;
> his notion that the availability of the second, millimeter side would
> make justifying its cost easy is a really inspired piece of nonsense.
>
> I wish I'd thought of it.
>
> John Gilmore, Ashland, MA 01721 - USA
-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Assembler - convrssion of Epoch (Unix) time to printable

[Mike Schwab]

http://en.wikipedia.org/wiki/Unix_time
0 is 1970 Jan 01 00:00:00 GMT or UTC (Starting point)
1 is 1970 Jan 01 00:00:01 GMT or UTC (1 second)
60 is 1970 Jan 01 00:01:00 GMT or UTC (1 minute)
3600 is 1970 Jan 01 01:00:00 GMT or UTC (1 hour)
86400 is 1970 Jan 02 00:00:00 GMT or UTC (1 day)
2678400 is 1970 Feb 01 00:00:00 GMT or UTC (31 days)
31536000 is 1971 Jan 01 00:00:00 GMT or UTC (365 days)
315532809 is 1980 Jan 01 00:00:00 GMT or UTC (i3650 days plus 2 leap
days plus 9 leap seconds http://en.wikipedia.org/wiki/Leap_second )

On Tue, Mar 27, 2012 at 1:28 PM, Charles Mills  wrote:
> So Gil, you are saying that a UNIX time of, for example, 60, represents 1:34
> am on 1/1/1970 -- or represents 0:26 am? (Theoretically -- there were no
> leap seconds before 1970.)
>
> Charles
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf
> Of Paul Gilmartin
> Sent: Tuesday, March 27, 2012 6:30 AM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: Assembler - convrssion of Epoch (Unix) time to printable
>
> On Tue, 27 Mar 2012 07:47:39 -0500, McKown, John wrote:
>
>> ..., the UNIX epoch is simply a number. The number of seconds since
> 00:00:00 GMT 1 Jan 1970. It would be rather easy to convert to
> -mm-ddThh:mm:ss if it weren't for the "leap seconds". Which may or may
> not be of any interest to you.
>>
> Not really.  In effect, the origin of NTP shifts by one second every time a
> leap second occurs.  It is now 00:00:34 GMT 1 Jan 1970; in a little over 3
> months it will be 00:00:35 GMT 1 Jan 1970.
>
>    http://pubs.opengroup.org/onlinepubs/9699919799/xrat/V4_xbd_chap04.html
>
>    ... it is inappropriate to require that a time represented as seconds
>    since the Epoch precisely represent the number of seconds between
>    the referenced time and the Epoch.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Malicious Software Protection

[Mike Schwab]

Netscape came out with a 3270 compatible version (3.10) then they got
rid of it (I assume due to pressure from IBM)
http://jisemu.courts.state.md.us/Help.htm
I think it came with a list of sites that users had provided.

On Tue, Mar 27, 2012 at 12:49 PM, Scott Ford  wrote:
> Lets step through this logically:
>
> TN3270 
>
> 1. Must have RACF/ACF2/TSS  userid/lid/acid
> 2. Must have a valid password
> 3. Must have valid IP address
> 4. Must have valid port
> 5. Must have Firewall rule for #3 and #4 ...
>
> Other issues:  How many firewalls ?  How is the network architected ?
>
> This is just a favor ..FTP the same
>
> Scott J Ford
> Software Engineer
> http://www.identityforge.com

-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: z/os every two years

[Mike Schwab]

Not official.  But plan on it.  Official releases in Sept of odd years.

On Tue, Mar 27, 2012 at 7:17 PM, Andy White  wrote:
> Does anyone know when IBM is going to make this official? It is official?
> I am putting together 2013 projects and we normally up to now did upgrades
> once a year.
>
> http://blogs.realdolmen.com/experts/2012/03/13/a-new-zos-release-every-2-year/
>
> Andy S. White

-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Two "why" about the hardware

[Mike Schwab]

One complication is the multiplication of paths 256 is the limit.
And whatever delay that occurs in each switch.

(zSeries)16Ficon(McData)16Ficon(DS8000) is 16*16=256 paths.

(zSeries)4Ficon(Mcdata)8Ficon(McData)8Ficon(DS8000) is 4 * 8 * 8 = 256 paths.

(zSeries)4Ficon(Mcdata)4Ficon(McData)4Ficon(McData)4Ficon(DS8000) is 4
* 4 * 4 * 4 = 256 paths.

(zSeries)2Ficon(Mcdata)2Ficon(McData)2Ficon(McData)2Ficon(Mcdata)2Ficon(McData)2Ficon(McData)2Ficon(McData)2Ficon(DS8000)
is 2 * 2 * 2 * 2 * 2 * 2 * 2 * 2= 256 paths.

On Sun, Apr 1, 2012 at 9:49 AM, Yi Ming  wrote:
> 1 level of cascading (2 directors) is supported (i think IBM simply hasn't 
> got round to certifying multi-level cascades rather than it not working)
> http://www-03.ibm.com/support/techdocs/atsmastr.nsf/webindex/FQ116133
-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Two "why" about the hardware

[Mike Schwab]

Because that is how the paths are counted.  A particular I/O command
could come in on any Ficon channel, and leave on any FIcon channel.

On Sun, Apr 1, 2012 at 3:50 PM, R.S.  wrote:
> Why do you multiply the connection? And why the number of logical paths
> should affect connectivity? Number of logical paths is almost always related
> to CU electronics and  it is independent of switch used - it is the same
> with and without  switch or switches. Radoslaw Skorupka Lodz, Poland W dniu
> 2012-04-01 21:40, Mike Schwab pisze: > One complication is the
> multiplication of paths 256 is the limit. > And whatever delay that occurs
> in each switch. > (zSeries)16Ficon(McData)16Ficon(DS8000) is 16*16=256
> paths. > (zSeries)4Ficon(Mcdata)8Ficon(McData)8Ficon(DS8000) is 4 * 8 * 8 =
> 256 paths. >
> (zSeries)4Ficon(Mcdata)4Ficon(McData)4Ficon(McData)4Ficon(DS8000) is 4 > * 4
> * 4 * 4 = 256 paths. >
> (zSeries)2Ficon(Mcdata)2Ficon(McData)2Ficon(McData)2Ficon(Mcdata)2Ficon(McData)2Ficon(McData)2Ficon(McData)2Ficon(DS8000)
>> is 2 * 2 * 2 * 2 * 2 * 2 * 2 * 2= 256 paths.
-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Initialize Tape Options

[Mike Schwab]

I see some differences between your jcl and IBM's examples.
Why don't you try IBM's values?
Probably don't need the DEN value, or the LABEL that you supplied.

http://publib.boulder.ibm.com/infocenter/zos/v1r12/index.jsp?topic=%2Fcom.ibm.zos.r12.idau100%2Fdgt2u16018.htm

Example 1: Write EBCDIC Labels on Three Tapes

z/OS V1R12.0 DFSMSdfp Utilities
SC26-7414-07

In this example, serial numbers 001234, 001235 and 001236 are placed
on three tape volumes. The labels are written in EBCDIC at 800 bits
per inch. Each volume labeled is mounted, when it is required, on a
single 9-track tape unit.

  //LABEL1   JOB  ...
  //STEP1EXEC PGM=IEHINITT
  //SYSPRINT DD  SYSOUT=A
  //LABELDD  DCB=DEN=2,UNIT=(tape,1,DEFER)
  //SYSINDD  *
  LABEL   INITT  SER=001234,NUMBTAPE=3
  /*The control statements are as follows:

LABEL DD defines the tape unit used in the labeling operation.
SYSIN DD defines the control data set, which follows in the input stream.
LABEL INITT specifies the number of tapes to be labeled (3), beginning
with 001234.



On Sun, Apr 1, 2012 at 11:16 PM, Jake anderson  wrote:
> Dear All,
>
> Reason for opting another option to initialize was due to the below abend :
>
> SYSTEM SUPPORT UTILITIES      IEHINITT
>>>
>>
>> TAPE INITT SER=Z9BQB1
>>> 0007
>>
>> IEH627I VOLUME NOT LABELED , REASON CODE = 1000. REFER TO MESSAGE
>>> MANUAL FOR FOR EXPLANATION  OF BIT SETTINGS
>>
>> IEH605I INVALID DEVICE ALLOCATED ON D72D
>>>
>>
>> IEH607I ALLOCATED DEVICES EXHAUSTED
>>
>>
> JCL :
>
> //TAPEINIT JOB MSGCLASS=X,MSGLEVEL=(1,1),CLASS=T,
> //         NOTIFY=&SYSUID
> //STEP1    EXEC PGM=IEHINITT
> //TAPE     DD UNIT=890,LABEL=(1,SL)
> //SYSPRINT DD SYSOUT=*
> //SYSIN    DD *
> TAPE INITT SER=Z9BQB1
>
>>           ]
>>
>>
>
>>
>>
>>
> Z/os : 1.8
>
> Lookat explanation :
>
> Explanation:
>
> The volume was not labeled as a result of exit processing. The reason for
> the failure is encoded (hex representation) in the reason code, which maps
> directly to the settings in the four-byte field INXNLBRS in macro IEHUEXIT,
> which normally resides in SYS1.MACLIB. The macro should be referenced for
> the very latest mapping. However, the bit definitions current at the time
> of this edition are:
>  Byte 1 ww  X'80' Error on call to CSVDYNEX. X'40' An exit routine abended.
> X'20' Invalid return code from exit routine (not 0, 4, 8). X'10' Invalid
> reason code from exit routine (not 0, 4). X'08' A previous exit indicated
> that the volume is not to be labeled. X'04' Conflicts in the results from
> calls to exits have been encountered. X'02' At least one exit routine
> returned rc=0 with a modified volser and either other exit routines
> returned rc=0 without modifying the volser, or the modified volser's didn't
> match. X'01' Two or more exits requested that the volser be changed, but
> the changed volsers don't match.  Byte 2 xx  X'80' An exit routine
> requested no OWNERID change, but another exit requested an OWNERID change.
> X'40' Two or more exits requested that the OWNERID be changed, but the
> changed OWNERIDs don't match. X'20' An exit routine requested no ACCODE
> change, but another exit requested ACCODE change. X'10' Two or more exits
> requested that the ACCODE be changed, but the changed ACCODEs don't match.
> X'08' A conflict in the return codes returned by the exit routines was
> detected. One routine returned a 0 and another returned an 8. X'04' Invalid
> volser character supplied by an exit routine. X'02' Invalid OWNERID
> character supplied by an exit routine. X'01' Invalid ACCODE character
> supplied by an exit routine.  Byte 3 yy  X'80' There is a conflict in rc=8
> reason code processing. An exit routine returned rsn=4, requesting remount
> and another returned rsn=0, indicating don't label the tape at all. X'40' An
> exit routine requested remount but no new volser was provided. X'20' Conflict
> in remount volser value. New volser values don't match. X'10' Failure in
> internal processing not related to dynamic exits services. X'08' Operator
> replied to skip labeling the volume. X'04' Mounted volume is file
> protected. X'02' Reserved. X'01' Reserved.  Byte 4 zz  X'FF' Reserved.
> System action:
>
> Processing will continue with next INITT control card, if possible.
> Conditions such as failures in the CSVDYNEX facility will prevent
> continuation.
> Operator response:
>
> None.
> System programmer response:
>
> A System Programmer may need to investigate some failures, particularly
> those associated with the CSVDYNEX facility itself. Other failures that may
> require such attention would be those associated with conflicts between
> exit routines.
>
>
> Is there anyone who has faced this similar issue at your shops ?
>
>
> Jake
>
> On Mon, Apr 2, 2012 at 7:38 AM, Russell Witt  wrote:
>
>> Kees,
>>
>> Actually, the CA-1 utility does not invoke IEHINITT. After doing the
>> administration (validating the tape is in scratch status), we re-write the
>> VOL1/HDR1 records with the defined volse

Re: Initialize Tape error

[Mike Schwab]

Try
//TAPEDD  UNIT=(0890,1,DEFER)

On Mon, Apr 2, 2012 at 11:20 PM, Jake anderson  wrote:
> Dear Linda,
>
> Still no luck:
>
> //TAPE     DD UNIT=890,LABEL=(1,SL),STORCLAS=NONSMS
-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Initialize Tape error

[Mike Schwab]

Why did you add the LABEL statement?

On Tue, Apr 3, 2012 at 12:05 AM, Jake anderson  wrote:
> "//TAPEINIT JOB MSGCLASS=X,MSGLEVEL=(1,1),
> //             NOTIFY=&SYSUID,CLASS=T
> //STEP1 EXEC PGM=IEHINITT
> //TAPE  DD UNIT=(0890,1,DEFER),LABEL=(1,SL)
> //SYSPRINT DD SYSOUT=*
> //SYSIN    DD *
> TAPE INITT SER=Z9BQB1
> /*                                                  "
>
> Mike,
>
> Its again the same error message.
>
> Jake
>
> On Tue, Apr 3, 2012 at 10:30 AM, Mike Schwab wrote:
>
>> Try
>> //TAPE    DD  UNIT=(0890,1,DEFER)
>>
>> On Mon, Apr 2, 2012 at 11:20 PM, Jake anderson 
>> wrote:
>> > Dear Linda,
>> >
>> > Still no luck:
>> >
>> > //TAPE     DD UNIT=890,LABEL=(1,SL),STORCLAS=NONSMS
>> --
>> 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...@bama.ua.edu with the message: INFO IBM-MAIN
>>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: VSAM help wanted for random reads

[Mike Schwab]

For right now, apply to '4' accounts, save misses to a file, then
close and open for input and process the '5' account and report the
misses.

I assume the input is sorted into ascending order for the fast
results.  How about changing the key definition so the account number
is in front and the account type (4 or 5) is at the end.  Should be
able to change the copylib and recompile, group move would have to be
broken into individual moves.  You can still print and display them
the other way.

On Tue, Apr 3, 2012 at 4:23 PM, Frank Swarbrick
 wrote:
> Current program does the following (in COBOL!).
>
> - Opens KSDS for I-O
> - Sequentially processes another file (non-VSAM).
> - For each record in the non-VSAM file it attempts a random (keyed) read of a 
> record on the KSDS file.  The key is, essentially, a concatenation of a 
> record type code ('4' or '5') and an account number.  If no record of type 
> '4' is found then it tries again for the same account, but with record type 
> '5'.  If either the '4' or '5' type is found it updates it and rewrites the 
> record (assuming the data changed).
>
> This takes about 16 minutes to run.  However if the 'type 5' logic is 
> removed, so that it only ever looks for type '4' records, it takes only about 
> one minute.
>
> Our resident VSAM expert says it has something to do with the VSAM "sequence 
> set" and the fact that only one is kept in memory at a time.  Since the same 
> sequence set doesn't appear to be able to be used for both the 'type 4' 
> records and the 'type 5' records it's constantly going back and forth, 
> loading the "other" sequence set from disk.  He says on VSE (which we were up 
> until May 2010) more than one sequence set can be in memory, but with MVS 
> this appears to not be the case.
>
>
> Hopefully that reason is accurate.  Is there a solution?  We thought about 
> having two COBOL FDs pointing to two DDs, where both DDs pointed to the same 
> KSDS.  This would probably(?) work, except for the fact of the update.
>
> Thanks,
> Frank
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Accessing USS on Mainframe thru Telnet

[Mike Schwab]

http://en.wikipedia.org/wiki/USS_Yorktown_(CG-48)
On 21 September 1997, while on maneuvers off the coast of Cape
Charles, Virginia, a crew member entered a zero into a database field
causing a divide by zero error in the ship's Remote Data Base Manager
which brought down all the machines on the network, causing the ship's
propulsion system to fail.[5]
[deleted[
Atlantic Fleet officials also denied the towing, reporting that
Yorktown was "dead in the water" for just 2 hours and 45 minutes.[6]
[deleted]

On Fri, Apr 6, 2012 at 8:32 AM, McKown, John
 wrote:
> Probably, given how we do things anymore, it would likely run Windows. I 
> dread the day that we lose a war because our weapons "blue screened".
>
> --
> John McKown
> Systems Engineer IV
-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Questions regarding SMS compacted dataset

[Mike Schwab]

On Tue, Apr 10, 2012 at 10:00 AM, Victor Zhang
 wrote:

>
> I already noticed a difference:
> By enabling compact option in storage class, I have very low compression 
> ratio for data written to tape/virtual tape, do you have any idea?
>
> Regards
> Victor
>
You are sending compressed data,  You can't compress it anymore.
-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Strange SDSF behavior

[Mike Schwab]

I was getting that on one particular system.  Supposedly just a few
people, but every few enters to check the progress the order would
change.

On Tue, Apr 10, 2012 at 4:18 PM, Steve Comstock
 wrote:
> Twice today the order of jobs in the SDSF status queue
> has been changed on me without my issuing any commands.
> That is, if you choose the View menu and Sort option,
> the value is different from what I set!
>
>
> I'm the only one on the system.
>
> Has anyone else seen this behavior? (z/OS 1.13)
>
-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Modernizing the BCP code ?

[Mike Schwab]

https://www-304.ibm.com/partnerworld/wps/servlet/ContentHandler/stg_com_sys_zpdt_announcement

z/PDT v 1.3 update available for download Mar 31, 2012 emulates z/196.

On Fri, Apr 13, 2012 at 8:00 AM, Scott Ford  wrote:
> Hey Bob,
> What us users of z/Pdt ?
>
> Sent from my iPad
> Scott Ford
> Senior Systems Engineer
> www.identityforge.com
>
>
>
> On Apr 12, 2012, at 12:41 PM, Bob Shannon  wrote:
>
>>> What about folks not running  Z9 for z/os 2.1 ?
>>
>> 2.1 requires an architectural level set.
>>
>> If you are running a z9 or higher (i.e., z10, z196 or z114), then you will 
>> be fine.
>>
>> If you are running a processor prior to a z9 (i.e., z800/z900, z890/z990) 
>> then you need a new processor if you want to run 2.1. Of course, with the 
>> extended support periods there is certainly need to rush into this.
>>
>>
>> Bob Shannon
>> Rocket Software
>>
>> --
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: GO TO "cobol"

[Mike Schwab]

Even a structured IF THEN ELSE END-IF or SELECT WHEN WHEN OTHERWISE
END-SELECT does gotos at the object code levels.  This is why
hyperthreading is so helpful.  One thread starts processing the GOTO
instructions and the other thread starts processing the fall through
instructions.  Once the branch is finalized, the wrong branch is
discarded.

On Sun, Apr 15, 2012 at 11:31 PM, Steve Comstock
 wrote:
> On 4/15/2012 9:49 PM, Jake anderson wrote:
>>
>> Hi All,
>>
>> Apology for asking a basic question and Being Ignorant. We know that GO TO
>> statments are a big "NO" in many production sites and one of the reason
>> being it monopolizes the entire CPU.
>
>
> Really? Well, as they say, "It ain't what you know, it's what
> you 'know' that ain't so"

-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: GO TO "cobol"

[Mike Schwab]

On Mon, Apr 16, 2012 at 6:26 PM, Paul Gilmartin >
> (Is "PFC" a Navy rank?)
>
> -- gil

TLA for ARMY Private FIrst Class.
http://usmilitary.about.com/od/theorderlyroom/l/blenlrank.htm

Navy equivalent is a TLA SN for Seaman.
Be sure not to drop the first A and replace the second A with an E.
-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: IEHLIST LISTVTOC inconsistency

[Mike Schwab]

On Mon, Apr 16, 2012 at 8:29 PM, Paul Gilmartin  wrote:
> On Mon, 16 Apr 2012 17:06:28 -0700, Dale McCart  wrote:
>
>>Your JCL will fail on z/OS 1.12 as well.
>>
>>change name of SYSLIB   DD to something else //VDSKAA9   DD
>>UNIT=3390,VOL=SER=DSKAA9,DISP=SHR will work.
>>
>>While you would think SYSLIB would qualify as anyname apparently it dose
>>not.
>>
> Submit a PMR.
>
>
>>Under z/OS 1.11, IEHLIST lists the VTOC as expected. Under z/OS 1.13,
>>IEHLIST issues the following message and quits:
>>
>>IEH106I UNAVAILABLE DEVICE TYPE OR VOLUME I.D. SPECIFIED
>>
> Even if the doc were to be updated (as it should), the message is
> totally irrelevant to the syntax error.  They might even fix it (they
> should) by removing the dependency on "SYSLIB" and using a
> generated DDNAME.
>
> -- gil
>
Actually, they probrably would document that SYSLIB DD name cannot be
used to with z/OS 1.12 and above to allow for testing alternate
versions of the program.
-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Origins of numeric assignation of z196 & z114

[Mike Schwab]

On Tue, Apr 17, 2012 at 5:50 AM, Jan MOEYERSONS
 wrote:
> On Mon, 16 Apr 2012 16:41:51 +0200, R.S.  
> wrote:
>
>>BTW: I really can't understand "marketing names" like z196, TS1140, or
>>DS8000. Why don't they use names like Jaguar (ok, it's partially used),
>>MAGSTAR, T-REX, MtBlanc or Cindy Crawford?
>
> A rose, by any other name...
>
Bet he does not like BMW model names either.
-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: GO TO "cobol"

[Mike Schwab]

On Tue, Apr 17, 2012 at 5:21 PM, Shmuel Metz (Seymour J.)
> Listen to "Every OS Sucks" by 3 Dead Trolls in a Baggie.
>
> --
>     Shmuel (Seymour J.) Metz, SysProg and JOAT

Animated version.
http://www.youtube.com/watch?v=hg0iRd4i0qk
-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Reversing the Catalog Definition entries

[Mike Schwab]

On Tue, Apr 17, 2012 at 10:15 PM, Jake anderson
 wrote:
> Hello ,
>
> "If you bring the datasets up in ISPF 3.4, just type a U in front of the
> DSN(s) and when that completes, type a C"
>
> Are there any sample JCLs which would perform the above stuff at once for
> all 214 datasets.
>
> Jake
>

//jobname JOB acct, etc
//stepname EXEC PGM=IEFBR14
//UDSN1  DD DISP=(OLD,UNCATLG).DSN=hlq1.dsn1
//CDSN1 DD UNIT=3390,VOL=SER=vv,DISP=(OLD,CATLG),DSN=hlq1.dsn1

Just typed, not tested.  Cut and paste from 3.4 listing, or in 3.4 use
P command and exit to save the list and use the next number.

-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: DB2 Fetch Behind the Scenes

[Mike Schwab]

On Thu, Apr 19, 2012 at 5:23 PM, George, William@FTB
 wrote:
> Note: I did attempt to send this to the DB2 group but it bounced back at
> me so I'll send it here to IBM-MAIN and attempt to figure out what went
> wrong with my DB2 auth.
>
> DB2 internals type of question.
>
> ISSUE
>
> We have a process that returns table rows matching on a masked name. The
> "LIKE" predict is used with a wildcard to return the matching names.
> We, not surprisingly, are experiencing time outs in our CICS region when
> the mask is rather open ended. For example:  LIKE "%AND%.  There are
> several million names in the database.
>
> We are now limiting the cursor to stop after 50 names have been returned
> but we still see some time outs.
>
> MAIN QUESTION
>
> Does the cursor, prior to returning any results, compile all the results
> before hand?  Meaning, even though we have limited to cursor loop to 50
> is it still compiling the thousands of results in the background?  Would
> at FETCH FIRST help in this case?  Something else?
>
> ADDITIONAL QUESTION
>
> Is there a better method than the LIKE predict?  The name column is part
> of an index and is the lead column.
>
> We are contemplating removing the beginning wildcard.  LIKE 'AND%'.
> This we figure should help but doesn't give the user as much
> flexibility.
>
> Any insights on main question would be much appreciated.
>
> Thanks
>
> Bill
>

1. If the first letter is a wild card, it is going throught the whole
DB until it finds the minimum number.  Simply requiring the first
letter be entered would split this into 26 searchs.

2.  Do you need a true wildcard search, or would a soundex search
(ignoring vowels and looking at consonants that sound similar) be a
better idea?

http://en.wikipedia.org/wiki/Soundex

A. Move the name fields to work fields.  Translate letters to numbers
as listed,  Compress out the duplicate numbers then the zeros.  Keep
initial and 3 numbers, Store in database as separate fields.

B. Take inquiry names, process same way, search soundex fields.
-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Progress Toward z/OS Personal Use License

[Mike Schwab]

On Wed, Apr 25, 2012 at 10:43 AM, Joel C. Ewing  wrote:
>
> A dongle definitely could be an issue for some.  Might be less of an issue
> on Linux, but my experiences on Windoze has been less than ideal and makes
> me regard any application that requires a dongle as more of a gamble.  While
> the dongle may be regarded as "nice license insurance" from the software
> vendors standpoint, it is essentially just another point of failure for the
> user and lowers the value of the product.
>
> My wife has some very expensive Embroidery software that requires a dongle.
>  The license does entitle her to run the software on multiple platforms,
> both her laptop and desktop, since the dongle prevents concurrent use. After
> a year or so the dongle case became too loose to remove the dongle from the
> USB port - the only way now is grasp and pull the dongle base with a pair of
> needle-nose pliers, which works, but is certainly not the advertised
> convenience. The only "support" provided by the application vendor to remedy
> this situation is to re-purchase the software at full price to get a new
> dongle.
>
> Other than using standard Windows GUI interfaces, this software does nothing
> that special at the Operating System level, except for the dongle support
> that requires a hardware driver written by yet a different vendor.  Logic
> would suggest that this application should be able to migrate from Win XP to
> Win 7 without a problem, provided one can find support for the dongle on Win
> 7.  My initial attempts to migrate have so far failed because the dongle
> vendor's current drivers for Win 7 are not compatible with the older version
> dongle that came with the application.  I haven't given up, but unless I can
> locate a compatible driver that is also compatible with Win 7 this expensive
> application is toast on Win 7.  A nice result for the application vendor if
> I'm forced to do an otherwise unnecessary upgrade at great cost, but from
> the user's standpoint this is a very poor outcome, apparently forced by the
> decision to require a dongle.
>
> --
> Joel C. Ewing,    Bentonville, AR       jcew...@acm.org
>

I had a USB Verizon celluar modem case fail and got it replaced under
insurance.  Now I put it on a USB Male A - Female A cord.
-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: The care and feeding of dongles (was: Progress Toward z/OS Personal Use License)

[Mike Schwab]

http://www.meninos.us/products.php?product=FLASH.DRIVE

Interesting anti-theft design for a USB memory stick.

On Wed, Apr 25, 2012 at 3:02 PM, zMan  wrote:
> You could even have the dongle inside a secure cabinet that way...drill a
> hole at the edge of the door for the cable, and lock that sucker in
> there...!
-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Entry Level z/OS Jobs Available in Dubuque Iowa

[Mike Schwab]

http://www-03.ibm.com/employment/us/iowajobs/

On Mon, Apr 30, 2012 at 2:31 PM, Eric Bielefeld  wrote:
> There are 4 open entry level z/OS System Programmer jobs available in Dubuque 
> Iowa working for IBM.  My boss is looking for recent college graduates who 
> want to get in to mainframe support.  To apply for these, go to google and 
> search for  "IBM Jobs Dubuque".  You don't need any z/OS experience.  You do 
> have to apply over the web site to be considered.
>
> While these positions probably aren't of any interest to most of the people 
> on this list, if you know anyone who recently graduated from college that is 
> looking, you might tell them.
>
> --
> Eric Bielefeld
> Systems Programmer
>
-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: old tapes and nostalgia

[Mike Schwab]

http://www.ibiblio.org/jmaynard/
Has OS/360 21.8 6 of 9 install tapes.  Does not list a date.

If you can give the title and document numbers for each reference card
we can see if we have a copy..

On Tue, May 1, 2012 at 6:04 PM, Bob Wilhelm  wrote:
> I find myself in possession of some old IBM tapes.
> Of no use to me, but maybe someone has "reel" tape drives
> (ie, not "cart").  All have labels of 9T, 1600bpi density.
>
> 1)  Scientific Subroutine Package, V3M0, dated 9-19-74.
>
> 2)  OS360, Rel 21.8, dated 10-08-74.
>
> 3)  OS360, Rel 21.8, dated 3-25-76.
>
> May not even be readable, but if you'd care to try, let me know.
> (I was thinking Hercules Project or some such.)  I also have a
> collection of old and assorted "reference cards" collected over
> the last 32 years, but those are not likely to have any value,
> either.  Missing the good old days, I guess.
>
> --Bob Wilhelm
> State of WY
>
-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: How to limit HRECALLs by USER request

[Mike Schwab]

When I have done lots of recalls, when a tape is mounted it processes
all other pending requests on the same tape before it dismounts the
tape.

On Wed, May 2, 2012 at 11:35 AM, Lizette Koehler
 wrote:

> For example, if I submit 100 recalls that will actually need 40 different 
> migration tapes.  Is there any way to get DFHSM to force the recalls to be 
> done by migration volume rather than FIFO?
>
> We are z/OS V1.12 and are using CRQ processing in DFHSM.
>
> thanks for any insights
>
> Lizette

-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: The old is new again - Not IBM related, but I hope interesting

[Mike Schwab]

http://plugable.com/products/

The two products are already in production.  This kickstarter project
is to do 1 large order for a lower unit cost.

On Wed, May 2, 2012 at 8:05 AM, McKown, John
 wrote:
> Doesn't really say __how__ it works internally. The author simply says that, 
> on Fedora 17, it is truly "plug and play". He plugged it into a PC running 
> Fedora and he immediately saw a GDM login screen. He said performance was 
> generally good, except for some HD video from YouTube.
>
> This is a "Kickstart" project, which means it isn't ready yet. From the 
> Kickstart page, it implies this is an all hardware solution using ASICs.
>
> http://www.kickstarter.com/projects/1666707630/plugable-thin-client-the-50-computer
>
> --
> John McKown
>
>> -Original Message-
>> From: IBM Mainframe Discussion List
>> [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Paul Gilmartin
>> Sent: Wednesday, May 02, 2012 7:41 AM
>> To: IBM-MAIN@bama.ua.edu
>> Subject: Re: The old is new again - Not IBM related, but I
>> hope interesting
>>
>> On Wed, 2 May 2012 07:00:37 -0500, McKown, John wrote:
>>
>> >
>> http://www.phoronix.com/scan.php?page=article&item=plugable_multiseat_kick&num=1
>> >
>> >This is a USB device which can plug into a normal PC running
>> Linux (Fedora 17 is mentioned). You then connect a
>> DisplayLink monitor, USB keyboard and mouse to the device.
>> And you have a multi-user system on a single PC. Not a
>> "server" PC with other PCs connected as "clients", but just
>> one single PC. Reminds me of what could be done with MP/M-80
>> (the multiuser version of CP/M-80), except back then it was a
>> serial (RS-232?) connected keyboard/display. Or, maybe, an
>> S/360 with a 2260(?) or 3272(?).
>> >
>> Ah!  The complement to the KVM switch!  But it probably has
>> the "client" PC
>> embedded in the USB plug.  I wonder what OS it runs?  Is there an X11
>> server either in the USB plug or in the DisplayLink monitor?
>> Does it need
>> a driver?
>>
>> -- gil

-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Programming languages can't have copyright protection, EU court rules

[Mike Schwab]

This is not the code.  This is the language specification.  Someone
could write their own version of your product.  Then users could buy
their application instead of yours and run their programs.

On Wed, May 2, 2012 at 9:33 PM, Scott Ford  wrote:
> All,
>
> So how do you protect code, whatever language you have written in , in 
> business ?
> Without copyright, doesn't it imply , people can take you source and change 
> it and resell it ...if the gave your source , right ?
>
>
> Scott Ford
> Senior Systems Engineer
> www.identityforge.com
>
>
>
> On May 2, 2012, at 1:49 PM, Charles Mills  wrote:
>
>>> Can one replicate the 'look and feel' without copyright issues in the EU
>> now?
>>
>> I might add that "look and feel" might be subject to copyright protection.
>> Copyright, again, protects *expression.*
>>
>> If I wrote a z/OS system monitor that cleverly displayed the status of
>> started tasks as bouncing balls of various sizes and colors, that expression
>> might be subject to copyright, but the function of displaying the status of
>> started tasks graphically would not.
>>
>> Charles
-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Old timer question

[Mike Schwab]

If they were labels, wouldn't it be a good idea to block by the number
of lines in a page?

On Sat, May 5, 2012 at 12:18 PM, Linda Mooney  wrote:
> Hi John,
>
> A long time ago, we had a lot of these in my shop.  COBOL programs that wrote 
> labels at 133/133 FA, printed on continous form label stock, generally 3 
> labels wide .  The RECFM was set in the COBOL program, and that was where it 
> had to be fixed.
>
> At that time, the big advantage was that the labels  could be unspooled from 
> tape direct to printer, so it gave the operator very tight control on back 
> space, etc. if a label peeled off in the printer and needed to be recovered.  
> If the print ran through JES2, there would always be a lot fewer 'pages' in 
> the buffer if the printer had to be backspaced there.
>
> There were some attempts made to change the DCB after the dataset was built, 
> but they were not successful.  I don't know exactly what they tried   - I was 
> at the printing end in those days.
>
> HTH,
>
> Linda
>
--
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Modern users of "old tech"

[Mike Schwab]

And the owner of the last blank punch card supplied died and the
company closed up.

On Thu, May 10, 2012 at 3:44 PM, Rick Fochtman  wrote:
> On 5/10/2012 1:58 PM, Shmuel Metz (Seymour J.) wrote:
>>
>> In,
>> on 05/10/2012
>>    at 07:25 AM, "McKown, John"  said:
>>
>>> Interesting. A company in Texas still using an IBM 402 tab
>>> machine is an example.
>>
>> Masochism?
>>
> Either that or a latent death wish.  :-)
>
> Rick
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: ### of GDG Entries

[Mike Schwab]

We have Mobius that creates report files with the date and time as
part of the file name.  Huge numbers of 1 track datasets.

On Fri, May 11, 2012 at 12:02 AM, Robert A. Rosenberg  wrote:
> At 20:12 + on 05/10/2012, Donnelly, John wrote about ### of GDG Entries:
>
>> We have a business application that creates literally 100s of GDGs a day;
>> please don't ask.
>> Is there any way to create or pretend to create a GDG base greater than
>> 255...
>
>
> Why not concatenate all of them daily and create a new GDG entry from the
> result (ie: Have as single master GDG dataset for each day). That way you
> would have the last 255 days worth of data. Is there any need to be able to
> separately access each of the GDGs created?
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Comparison of compiler generated code AD 1980(ish) v 2010(ish)

[Mike Schwab]

The Hercules group did some testing comparing MVCL to MVC.
If both source and destination had the same alignment to a double word
boundary, you could move 8 bytes, then increment the 4 registers to
reflect this, before being interuptable.  If they aligned differently
between boundaries, each 8 bytes would do this twice.

Whereas an MVC would do 256 bytes or less without interupting or
touching registers, and was much faster.

Of course, emulation is much different from hardware, ie, updating all
4 registers at once.

On Wed, May 16, 2012 at 2:41 PM, Bernd Oppolzer
 wrote:
> First, I would like to thank you for starting this thread.
>
> I posted it to the performance people of my customer, and they told me, that
> they just found a similar problem with EP PL/1 3.9, that is: the PLIMOVE
> calls
> don't generate MVCLs any more, as in previous releases, but series of MVCs
> and loops. Even when the length of PLIMOVE is - for example - 8000 bytes.
> They discovered it, because one of the PLIMOVE locations showed up in a
> Strobe report.
>
> I asked them to test using a ASSEMBLER program, if the MVC loop is faster,
> but they told me, that even with lengths around 500 or 600, the MVCL
> solution is faster
> - this is on a z196. I have still to confirm this.
>
> If this turns out to be true, this sounds like a bug, and we will try to
> convince IBM to go back to
> the previous solution. If we compile our modules during normal service using
> EP PL/1 3.9,
> our system will get slower and slower, because PLIMOVE is widely used.
> This is not acceptable.
>
> Because the PLIMOVEs are generated by a site-specific macro called PLICOPY,
> I already thought about calling a short ASSEMBLER routine (with minimal
> linkage conventions)
> doing the transfer using MVCL instead of CALL PLIMOVE. The applications need
> not
> to be changed, because the PLICOPY syntax stays the same. Maybe this could
> still be
> faster than doing the MVC loop.
>
> Kind regards
>
> Bernd


-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Comparison of compiler generated code AD 1980(ish) v 2010(ish)

[Mike Schwab]

On Fri, May 18, 2012 at 3:54 AM, Robert AH Prins
 wrote:
> On 2012-05-17 11:42, Robert AH Prins wrote:
>>
>> On 2012-05-17 11:14, Bernd Oppolzer wrote:
>>>
>>> I would like to add:
>>>
>>> with the previous compiler, CALL PLIMOVE enabled us to force the
>>> generation of
>>> MVCL.
>>>
>>> Using, for example
>>>
>>> CALL PLIMOVE (ADDR (target), ADDR (source), length);
>>>
>>> the compiler generated MVCL,
>>>
>>> but coding
>>>
>>> target = source;
>>>
>>> (if applicable), or BY-NAME-assignments, the compile generated MVCs etc.
>>>
>>> Now, with V3.9, the compiler generates the same in the two cases,
>>> that is MVCs or MVC loops, so we have no possibility to force the
>>> generation of MVCL. AFAIK, my co-workers didn't play with the ARCH
>>> options, so far. TUNE is TUNE(2), again AFAIK.
>>
>>
>> The TUNE option has been removed from the V4.1 anyway.
>>
>>> I have other projects at the moment, so I had not much time so far to
>>> investigate this. But remember: the problem showed up by a Strobe Report,
>>> so it seems to be significant.
>>>
>>> But: if PLIMOVE does no better than a simple assignment, using PLIMOVE
>>> seems to make no sense to me.
>>>
>>> In a certain way, this problem is somewhat different from the first
>>> problem in this thread.
>>>
>>> Robert complained about the optimizer doing a bad job, that is: some
>>> instructions are generated that are useless, and others are questionable.
>>>
>>> But here we have a simple instruction of the HLL (PLIMOVE) which I expect
>>> to be implemented using the best instructions the machine provides. If
>>> this turns out not to be the case, this is IMHO simply a bug, not only
>>> a flaw of the optimizer. The programmer already did some kind of
>>> optimization
>>> him- or herself, when he or she decided to use PLIMOVE. He or she may
>>> well
>>> expect that the compiler generates the best available machine instruction
>>> for this HLL instruction.
>>
>>
>> You hit the nail right on the head! But I do remember that there was a
>> APAR that
>> explains why the MVCL was removed again. I can't point you to it as the
>> link to
>> the PL/I APARs has gone 404.
>
>
> It's back and I have to correct myself, I've only managed to find a APAR
> telling that the generation MVCLE 's was removed
> 
>
> Robert
> --
> Robert AH Prins
> robert(a)prino(d)org
>
>From the APAR, dated 2009-02-02:
Problem summary

* USERS AFFECTED: Enterprise PL/I users with code that has *
* assignments to NONVARYING CHAR strings where *
* the source and/or the target has a length*
* not known at compile time*

* PROBLEM DESCRIPTION: The 3.6 and later releases of   *
*  Enterprise PL/I generated a MVCLE   *
*  instruction to perform such *
*  assignments. Unfortunately, while this  *
*  led to a much shorter set of*
*  instructions, it also led to*
*  significantly worse performance.*

* RECOMMENDATION:  *

The compiler has been changed so that it no longer generates
MVLCE's

-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: IBMLink outages in 2012

[Mike Schwab]

Actually, in 24 / 7 / 365, why are days listed twice?

24 hours a day, 365 days a year would cover it (ignoring leap day).
24 hours a day, 7 days a week, 52 weeks a year covers it a more
sensible way (ignoring the extra day or two past 364 days).

24 hours a day, 7 days a week, 365 weeks?  What happens after the 7 years?

On Mon, May 21, 2012 at 1:51 PM, Clark Morris  wrote:
> On 20 May 2012 20:18:55 -0700, in bit.listserv.ibm-main you wrote:
>
>>24/7/265? That hurts, sounds more like my tyres.
>
> I'm the last to see my own errors.  Hopefully it was obvious I meant
> 24/7/365 (or should that be 365.24?).
>
> Clark Morris

-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: 24/7/365 appropriateness was Re: IBMLink outages in 2012

[Mike Schwab]

On Wed, May 23, 2012 at 9:20 AM, Bill Fairchild
 wrote:
> And the general public, many Dilbertian managers, and even some of us 
> professional nitpickers, think that a job running 1 hour instead of 10 is 
> 900% faster, and that 1 is 10 times smaller than 10.  2+2 no longer = 5; now 
> it equals chartreuse.
>
> Fortunately architects and engineers know how to use mathematically accurate 
> and precise terminology when describing the bridges they design and build, or 
> we would have a lot more cars falling off of collapsing bridges.
>
> Bill Fairchild

http://en.wikipedia.org/wiki/List_of_bridge_failures
-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Masking Numeric Keys

[Mike Schwab]

If it is the U.S. tax number, about 700M have been issued since
inception and 300M in use every year.

On Fri, May 25, 2012 at 11:33 AM, Gibney, Dave  wrote:
> Surely you don't actually use all billion values.
-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Transferring stuff from Mainframe to a RDz/UT clone of itself

[Mike Schwab]

http://www.mail-archive.com/ibm-main@bama.ua.edu/msg124717.html

On Sun, May 27, 2012 at 9:38 AM, Kirk Wolf  wrote:
> I believe that MFNetDisk could be used to replicate volumes to a PC.  I
> wonder if you could convert the MFNetDisk volume file to the volume-file
> format used by zPDT?
>
> Kirk Wolf
> Dovetailed Technologies
> http://dovetail.com

-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Masking Numeric Keys

[Mike Schwab]

How about a table of 1,000 numbers that translates a specific 3 digit
number to another 3 digit number.
Use it 3 times on 3 parts of your 9 digit number.

On Tue, May 29, 2012 at 9:53 AM, Roberts, John J
 wrote:
>>>Just curious: how would you mask names and addresses?  Of course, if >>these
>>>are not used as keys some constraints such as uniqueness are relaxed.
>
>>>-- gil
>
> Our data records have fields for first name, last name, and gender.  They of 
> course do not need to be unique.  But the masking algorithm must be 
> deterministic.  So if we have a name "JOHN SMITH" that our algorithm 
> translates to "FRED COLLINS", then "JOHN SMITH" must become "FRED COLLINS" 
> across all files.
>
> My technique for doing the transformation is as follows:
> (1) I have a table of several hundred surnames.
> (2) Also another table of female first names.
> (3) Yet another table of male first names.
>
> To transform a surname, I put the real surname thru a hash function and use 
> the value obtained as an index into my table of surnames.
>
> To transform a first name, I put the real first name thru the hash function 
> and then use the value as an index into the proper given name table, as 
> selected using the gender code.
>
> So, using a scheme such as this, "JOHN SMITH" will always get translated to 
> the same fictitious value (e.g. "FRED COLLINS").  But someone seeing "FRED 
> COLLINS" in a test file won't be able to conclude that this is really a 
> record for "JOHN SMITH", since thousands of other real names will also 
> translate to "FRED COLLINS".
>
> Transforming addresses uses a similar idea to mask the street name, although 
> it gets a bit ugly at times.  Street number will be masked by hashing. 
> Fortunately, we do not need to worry about creating fictitious addresses that 
> are in the USPS database.
>
> John
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: What is a PC Call?

[Mike Schwab]

Just because they added something to the hardware, does not mean they
are ready to add it to the operating system.

When z/VM 6 came out, it required a z10 to run on, because they
changed the software to use hardware introduced with that processort.
Which means they need to support z/VM 5 on older processors until they
upgrade or exceed the reasonable hardware lifetime.

When z/OS 2.1 comes out, it will drop support for z/900 and z/990
processors so they can use hardware feature only available on newer
hardware.  You can still run z/OS 1.13 on older processor but not take
advantage of the newer hardware.

They may be taking advantage of newer hardware features, but some
features you can't fully utilize until all LPARs have the proper
hardware and software levels.

On Thu, May 31, 2012 at 11:34 AM, Charles Mills  wrote:
> Great stuff Chris, thank you!
>
> The problem I have had with a lot of things like this is that the PoOp
> describes the hardware in a vacuum, as though z/OS did not exist. (As it
> probably should.) It is also "non-judgmental" -- never says "this
> instruction is basically an antique, or is likely to get you into trouble --
> use this other one instead." Then the z/OS manuals describe things using
> z/OS terminology, and it is hard to pull the whole big picture together: you
> can use this hardware facility thusly in the z/OS environment. There is some
> whole addressing mode as I recall that the PoOp spends a bunch of time on
> but that z/OS does not support, so it is basically useless unless you are
> running (or writing!) some OS other than z/OS.
>
> This presentation is great!
>
> Charles

-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: STK SMC/HSC and SMS Tape

[Mike Schwab]

You will need to vary the disk volume offline before you can use the
tape volume on the same LPAR.

On Sat, Jun 2, 2012 at 10:21 PM, Tom Williamson  wrote:
> Hello,
>
> We have a customer that is doing some tape migration.
> They are currently using STK SMC manage their SILO.
>
> If we create a SMS Tape Library (MTL) and add a volume to it that is also in 
> the SILO which unit will be picked by allocation?
> There is a statement in the SMC manual that says SMC will ignore SMS Managed 
> Devices.  It actually talks about SMS Dataset also.  But while sms tape is a 
> sms managed device I am not sure that a dataset that references a sms managed 
> tape is a sms managed dataset?
>
> //DD1  DD  UNIT=TAPE,DISP=OLD,VOL=SER=SMS111
>
> If SMS111 is also in the SILO will SMC change the allocation to the SILO or 
> leave it alone?
>
> Thanks for any help
> Tom
-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Is there an Enterprise COBOL API to detect SOURCE-COMPUTER "WITH DEBUGGING" on or off at runtime?

[Mike Schwab]

How about a LINKAGE SECTION to access the parm
//STEPNAME EXEC PGM=program,PARM='' or
//STEPNAME EXEC PGM=program,PARM='DEBUG'

Inside the program,
LINKAGE SECTION.
01 PARM-ALL.
05 PARM-LENGTH PIC S9(4) COMP.
05 PARM-DATA.
10 PARM-BYTE PIC X OCCURS 0 TO 100 DEPENDING ON PARM-LENGTH.

PROCEDURE DIVISION.
IF PARM-LENGTH > 4 AND PARM-DATA = 'DEBUG'
  DISPLAY 'PARA  Varialble = ' Variable.
END-IF.

You have the overhead of the Ifs every time, but can rerun with a
different parm todo your debugging.  Or comment out the with debugging
mode to take the code out.

On Mon, Jun 4, 2012 at 12:11 PM, Farley, Peter x23353
 wrote:
> The subject is the question.  Obviously I can insert a WORKING-STORAGE switch 
> that is off by default and a "D"ebugging line in the PROCEDURE division to 
> turn "on" that switch when "WITH DEBUGGING" is in effect, but this seems 
> clumsy to me.
>
> If there is another way, I'd appreciate any info you can provide.
>
> Peter
>
>
> This message and any attachments are intended only for the use of the 
> addressee and may contain information that is privileged and confidential. If 
> the reader of the message is not the intended recipient or an authorized 
> representative of the intended recipient, you are hereby notified that any 
> dissemination of this communication is strictly prohibited. If you have 
> received this communication in error, please notify us immediately by e-mail 
> and delete the message and any attachments from your system.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: JCL PROBLEM

[Mike Schwab]

Might I suggest a RETAIN on the FIRST step and omit on the LAST step?

On Tue, Jun 5, 2012 at 4:20 PM, John Dawes  wrote:
> John,
>
> You were spot on.  Your suggestion worked.  Thanks a million.
>
> Thanks to all who responded for my plea for help.
-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: JCL PROBLEM

[Mike Schwab]

Oh, and catalog all the datasets.  During a DR test, only the first
dataset was cataloged and it was on just the first volume, and only
the first tape was sent for the exercise.  Since there was no
cataloged datasets on the second tape, it was not sent.  The
application people had to Fedex the second tape to complete their
test.

On Tue, Jun 5, 2012 at 4:51 PM, Mark Zelden  wrote:
> Besides that issue, the refback should ALWAYS be to the previous step,
> not the first step.    If it ever goes to a 2nd volume you will get an
> abend.   Gee... it's been so long that I've dealt with anyone doing
> that I can't remember, but I think it's an A13 abend.
>
> 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/
>
> On Tue, 5 Jun 2012 16:05:05 -0500, McKown, John 
>  wrote:
>
>>I'm fairly sure you need the
>>
>>REF=*.STEP01.PROC001.TAPE
>>
>>to be
>>
>>REF=*.PROC001.STEP01.TAPE
>>
>>--
>>John McKown
>>Systems Engineer IV
>>IT
>>
>>Administrative Services Group
>>
>>HealthMarkets®
>>
>>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® is the brand name for products underwritten and 
>>issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake 
>>Life Insurance Company®, Mid-West National Life Insurance Company of 
>>TennesseeSM and The MEGA Life and Health Insurance Company.SM
>>
>>> -Original Message-
>>> From: IBM Mainframe Discussion List
>>> [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of John Dawes
>>> Sent: Tuesday, June 05, 2012 4:02 PM
>>> To: IBM-MAIN@bama.ua.edu
>>> Subject: JCL PROBLEM
>>>
>>> G'Day,
>>>
>>> I am having a problem (jcl error) trying to run this job.
>>> The object is to have all the backups written out to a 3592 tape.
>>> //***
>>> //PROC001 EXEC FCBPRDXX,TARGET='FQ8A00',SOURCE='PAGE01',LB='1'
>>> //PROC002 EXEC FCBPRDXX,TARGET='FQ8A01',SOURCE='CSYS01',LB='2'
>>> //STEP01.TAPE DD VOL=(,RETAIN,,REF=*.STEP01.PROC001.TAPE)
>>> //PROC003 EXEC FCBPRDXX,TARGET='FQ8A02',SOURCE='CSYS02',LB='3'
>>> //STEP01.TAPE DD VOL=(,RETAIN,,REF=*.STEP01.PROC001.TAPE)
>>> //PROC004 EXEC FCBPRDXX,TARGET='FQ8A03',SOURCE='CSYS03',LB='4'
>>> //STEP01.TAPE DD VOL=(,RETAIN,,REF=*.STEP01.PROC001.TAPE)
>>> //PROC005 EXEC FCBPRDXX,TARGET='FQ8A04',SOURCE='CSYS04',LB='5'
>>> //STEP01.TAPE DD VOL=(,RETAIN,,REF=*.STEP01.PROC001.TAPE)
>>> //PROC006 EXEC FCBPRDXX,TARGET='FQ8A05',SOURCE='CSYS05',LB='6'
>>> //STEP01.TAPE DD VOL=(,RETAIN,,REF=*.STEP01.PROC001.TAPE)
>>> //PROC007 EXEC FCBPRDXX,TARGET='FQ8A06',SOURCE='CSYS06',LB='7'
>>> //STEP01.TAPE DD VOL=(,RETAIN,,REF=*.STEP01.PROC001.TAPE)
>>> //PROC008 EXEC FCBPRDXX,TARGET='FQ8A07',SOURCE='CSYS07',LB='8'
>>> //STEP01.TAPE DD VOL=(,RETAIN,,REF=*.STEP01.PROC001.TAPE)
>>> //PROC009 EXEC FCBPRDXX,TARGET='FQ8A08',SOURCE='PAGE02',LB='9'
>>> //STEP01.TAPE DD VOL=(,RETAIN,,REF=*.STEP01.PROC001.TAPE)
>>> //PROC010 EXEC FCBPRDXX,TARGET='FQ8A09',SOURCE='HFSC01',LB='10'
>>> //STEP01.TAPE DD VOL=(,RETAIN,,REF=*.STEP01.PROC001.TAPE)
>>>
>>> This is the proc:
>>>
>>> //FCBPRDXX PROC
>>> //*
>>> //STEP01  EXEC PGM=ADRDSSU PARM='TYPRUN=NORUN'
>>> //DISK DD VOL=SER=&TARGET,DISP=SHR,UNIT=3390
>>> //*TAPE    DD DSN=BKUP..XX.V&SOURCE.XX,
>>> //TAPE DD DSN=BKUP.DISTR.PRDDLY.V&SOURCE..D050612.TEST,
>>> //    DSORG=PS,TRTCH=COMP,UNIT=MAN3590,
>>> //    VOL=(,RETAIN),DISP=(NEW,CATLG,DELETE),
>>> //    LABEL=(&LB,SL)
>>> //SYSPRINT DD SYSOUT=*
>>> //SYSIN    DD DISP=SHR,DSN=SYS3.FLASHCPY.PROCLIB(#FCCOPY)
>>> //*
>>>
>>> The message I get is :
>>> IEF645I INVALID REFERBACK IN THE REF SUBPARAMETER OF THE VOLUME FIELD
>>>
>>> I cannot spot my error.  Can someone help me out?
>>>
>>> Thanks in advance.
>>>
>>> --
>>> For IBM-MAIN subscribe / signoff / archive access instructions,
>>> send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
>>>
>>>
>>
>>--
>>For IBM-MAIN subscribe / signoff / archive access instructions,
>>send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.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?

---

Re: JCL PROBLEM

[Mike Schwab]

The keywords go after the positional parameters.

On Tue, Jun 5, 2012 at 5:21 PM, John Dawes  wrote:
> Thanks for the tip.  If I need to code the vol parm  e.g. VOL=(,,,35)  if the 
> output exceedes 5 vols (system default) how would I go about it since I 
> already have a vol parm in the jcl.
-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Need a PC tape drive to read 3490, 3490E

[Mike Schwab]

There are some people on the Hercules group that will read the tapes
and post the AWSTAPE files.  You just have to get the tape to them.

On Wed, Jun 6, 2012 at 10:26 AM, Sam Golob  wrote:
> Hi Folks,
>
>     Does anybody have a suggestion how I can get a tape drive to attach to a
> PC so that I can read 3490, 3490E tapes, without my having to spend a couple
> of thousand dollars?  I need this to support the CBT Tape effort and to try
> and resurrect old archives for the public's benefit.
>
>     Thanks much.
>
> Sincerely,   Sam Golob
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Need to make a catalog entry for a SMS managed Virtual tape

[Mike Schwab]

Try to read it (maybe just 1 record) using DISP=(OLD,CATLG).

On Mon, Jun 11, 2012 at 1:09 PM, Darby, Jim  wrote:
> No my TCDB is okay, so both CA-1 and OAM know that the tape is private
> and where it is.  My problem is with MVS.  Define nonvsam makes it a
> non-sms entry in the MVS catalog and when I try to run the Alter command
> to roll it back into the gdg base, it fails and tells me I can rollin an
> non SMS dataset.
> Gives me the IDC3195I message:
>
> IDC3195I OBJECT IS NOT SMS MANAGED
>
> Explanation:  An access method services ALTER command requested that a
> generation data set (GDS) be rolled in, but the GDS is not managed by
> the
> storage management subsystem (SMS).
>
> Thoughts?
> Jim
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
> Behalf Of McKown, John
> Sent: Monday, June 11, 2012 10:58 AM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: Need to make a catalog entry for a SMS managed Virtual tape
>
> Are the volume serial numbers in the TCDB? I.e. the SMS Tape Control
> Data Base, which is usually name SYS1.VOLCAT.VGENERAL. I would bet that
> they are not. So you must run a ALTER command. We do this a lot at DR
> and have a REXX program:
>
> /* REXX */
> PARSE ARG INVOL
> "ALTER  V"INVOL" VOLENT STORGRP(SGRTAPE2) ",
>  "LIBNAME($ATL0002) LOCATION(LIBRARY) UATTR(PRIVATE)"
>
>
> //.. idcams jcl
> %ALTERVOL volser
> /*
> //* ONE PER VOLUME SERIAL.
>
> I bet your DEF NVSAM is OK. One that I have is:
>
>  DEF NVSAM(NAME(TSHPG.CICSMGR.P8.DAILY.HISTORY.G2422V00) -
>           DEVT(3490) -
>           VOL(238263))
>  ALTER V238263 VOLENT STORGRP(SGRTAPE2) -
>     LIBNAME($ATL0002) LOCATION(LIBRARY) UATTR(PRIVATE)
>
> You need both. I am not sure, but you might be able to get away with
> doing the DEF NVSAM, followed by a CTSSYNC from CA-1. I'm not sure.
>
>
>
> 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
>
>
>
>> -Original Message-
>> From: IBM Mainframe Discussion List
>> [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Darby, Jim
>> Sent: Monday, June 11, 2012 12:41 PM
>> To: IBM-MAIN@bama.ua.edu
>> Subject: Need to make a catalog entry for a SMS managed Virtual tape
>>
>>  Hi,
>> Had a group of SMS managed virtual tapes be accidently scratched and
>> I'm trying to recreate the entries.  Updated CA-1 okay and the tapes
>> are still on the stacked drives and marked private there, but my
>> question is around the MVS catalog entry.  I tried to do IDCAMS
>> "define nonvsam name, decivetype and volume" entries and then use
>> alter rollin to re-attach them to the base  but alter won't work
>> because they're not SMS managed.  Define Nonvsam would let me include
>> SMS constructs, and I can't "alter" it a SMS storage class either.
>>
>> There has to be a way to make a MVS catalog entry of a tape gdg, and
>> then roll it into the base.
>>
>> What have I forgot?
>>
>> Jim
>>
>> --
>> For IBM-MAIN subscribe / signoff / archive access instructions, send
>> email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
>>
>>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send
> email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Need to make a catalog entry for a SMS managed Virtual tape

[Mike Schwab]

http://publib.boulder.ibm.com/infocenter/zos/v1r12/index.jsp?topic=%2Fcom.ibm.zos.r12.idad400%2Froll.htm

Issue the IDCAMS ALTER hlq.data.set.name ROLLIN command to pickup
cataloged datasets into the GDG.

On Mon, Jun 11, 2012 at 2:57 PM, Darby, Jim  wrote:
> I can read the dataset just fine by asking for it by complete name, what I 
> need to do is to get in rolled back into the gdg base so it can be accessed 
> as the 0 gen or -1 and so forth.  Right now it isn't part of the gdg group.
>
> Jim
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf 
> Of Mike Schwab
> Sent: Monday, June 11, 2012 12:09 PM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: Need to make a catalog entry for a SMS managed Virtual tape
>
> Try to read it (maybe just 1 record) using DISP=(OLD,CATLG).
>
> On Mon, Jun 11, 2012 at 1:09 PM, Darby, Jim  wrote:
>> No my TCDB is okay, so both CA-1 and OAM know that the tape is private
>> and where it is.  My problem is with MVS.  Define nonvsam makes it a
>> non-sms entry in the MVS catalog and when I try to run the Alter
>> command to roll it back into the gdg base, it fails and tells me I can
>> rollin an non SMS dataset.
>> Gives me the IDC3195I message:
>>
>> IDC3195I OBJECT IS NOT SMS MANAGED
>>
>> Explanation:  An access method services ALTER command requested that a
>> generation data set (GDS) be rolled in, but the GDS is not managed by
>> the storage management subsystem (SMS).
>>
>> Thoughts?
>> Jim
>>
>> -Original Message-
>> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
>> Behalf Of McKown, John
>> Sent: Monday, June 11, 2012 10:58 AM
>> To: IBM-MAIN@bama.ua.edu
>> Subject: Re: Need to make a catalog entry for a SMS managed Virtual
>> tape
>>
>> Are the volume serial numbers in the TCDB? I.e. the SMS Tape Control
>> Data Base, which is usually name SYS1.VOLCAT.VGENERAL. I would bet
>> that they are not. So you must run a ALTER command. We do this a lot
>> at DR and have a REXX program:
>>
>> /* REXX */
>> PARSE ARG INVOL
>> "ALTER  V"INVOL" VOLENT STORGRP(SGRTAPE2) ",
>>  "LIBNAME($ATL0002) LOCATION(LIBRARY) UATTR(PRIVATE)"
>>
>>
>> //.. idcams jcl
>> %ALTERVOL volser
>> /*
>> //* ONE PER VOLUME SERIAL.
>>
>> I bet your DEF NVSAM is OK. One that I have is:
>>
>>  DEF NVSAM(NAME(TSHPG.CICSMGR.P8.DAILY.HISTORY.G2422V00) -
>>           DEVT(3490) -
>>           VOL(238263))
>>  ALTER V238263 VOLENT STORGRP(SGRTAPE2) -
>>     LIBNAME($ATL0002) LOCATION(LIBRARY) UATTR(PRIVATE)
>>
>> You need both. I am not sure, but you might be able to get away with
>> doing the DEF NVSAM, followed by a CTSSYNC from CA-1. I'm not sure.
>>
>>
>>
>> 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
>>
>>
>>
>>> -Original Message-
>>> From: IBM Mainframe Discussion List
>>> [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Darby, Jim
>>> Sent: Monday, June 11, 2012 12:41 PM
>>> To: IBM-MAIN@bama.ua.edu
>>> Subject: Need to make a catalog entry for a SMS managed Virtual tape
>>>
>>>  Hi,
>>> Had a group of SMS managed virtual tapes be accidently scratched and
>>> I'm trying to recreate the entries.  Updated CA-1 okay and the tapes
>>> are still on the stacked drives and marked private there, but my
>>> question is around the MVS catalog entry.  I tried to do IDCAMS
>>> "define nonvsam name, decivetype and volume" entries and then use
>>> alter rollin to re-attach them to the base

Re: z/OS Printsrv

[Mike Schwab]

If you are sending EBCDIC and it is not translated to ASCII, you will
get @ printed where blanks are expected (a whole lot of places).  Fix
by translating EBCDIC to ASCII.

On Wed, Jun 13, 2012 at 5:29 AM, Andre Massena
 wrote:
> Hello all,
>
> have the following problem(s):
>
> Printsrv and all of it's bells and whistles works on z/OS 1.10 and 1.12.
>
> I have TARed (PAXed) the /var/Printsrv directory, copied it to my target
> (z/OS1.13) and started Printsrv as per instructions.
>
> All necessary RACF, Linklist and USS definitions are in place.
>
> When I look at the printer definitions on z/OS 1.13 from the ISPF interface,
> all seems as it should be, i.e. all printers definitions are as defined in
> z/OS 1.10 / 1.12.
>
> From SDSF I can print a JES output using 'xsc' and everything appears on my
> chosen printer in clear and legible format.
>
> Using the APPPRINT utility (Batch) I see the banner page being printed
> legibly, everything after that, however, is illegible. It would seem that
> the print is being somewhat overlaid.
>
> I can see no strange errors / messages when I look at the Printsrv log on
> the ISPF interface.
>
> Would anyone have any pointers / hints??
>
> Regards,
>
> Andre


-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: Anyone a Unicode Services expert? -- roundtrip conversion

[Mike Schwab]

On Wed, Jun 13, 2012 at 12:59 PM, Charles Mills  wrote:
> I got a response to the PMR. Taking the liberty of paraphrasing a long
> reply, the essence of it seemed to be that -- per the CCSID pair lists in
> the manual -- they support round trip conversion from 1027 to 1208 but not
> from 1208 to 1027. Here is what I wrote back:
>
What this means is:
Roundtrip example:  Every defined character in 1027, excluding values
that do not have a character defined, exist in 1208, is successfully
translated from 1027 to 1208 and back to 1027.  All codepoints that do
not have a character defined will be translated to (one?) non-valid
value.

Non-roundtrip example:  Some defined characters in 1208, and all
codepoints that do not have a character defined, do not exist in 1027.
 If you translate text from 1208 to 1027, the characters not defined
in 1027, and all undefined codepoints will be translated to (one?)
non-valid codepoint.

In any translation, a codepoint that does not encode a character will
be translated to (one?) non-valid codepoint.

If, while the text is in 1208 is changed to add a character not in
1027, upon translation that value will be changed to an invalid value
in 1027.

> It sounds like you are saying (for the CCSIDs in question) "we support
> round trip, but in one direction only." It would be like if I bought a
> round trip ticket on Delta between San Francisco and Atlanta, and after
> I got to Atlanta, they explained that it was a round trip ticket only
> in one direction.
>
> I would kind of question also whether what you are doing conforms to
> your definition of round trip in the Unicode manual glossary: Round
> trip. Encoding that occurs when every code point in the source CCSID
> maps to a unique code point in the target CCSID.

You missed the word defined.  If a codepoint does not have a defined
character, it is translated to (one?) invalid value.

> Using round trip
> tables ensure the capability of reversing the conversion, and
> recovering the complete original source datastream.
>
> I would question "every code point in the source CCSID maps to a unique
> code point in the target CCSID" when both 3F and 41 map to the same
> code point, and I wonder how I would recover the original source
> datastream.
>
Again, you missed the word defined.  If a codepoint does not have a
defined character, it is translated to (one?) invalid value.

> Charles
>

-- 
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...@bama.ua.edu with the message: INFO IBM-MAIN

Re: IEFBR14

[Mike Schwab]

On Fri, Nov 19, 2010 at 12:00 PM, Tony Harminc  wrote:
> On 19 November 2010 11:56, Ron Wells  wrote:
>
>>> Just happened and seeing if anyone else has run across this
>>> runninf z/os 1.11  ran IEFBR14 and recieved 0C4-4 on one LPAR..runs on
>>> other LPAR
>>> put in STEPLIB on failing LPAR and works??
>
>> just to let everyone know...ca7 problem..
>
> That's pretty impressive. I've caused my fair share of S0C4s over my
> programming lifetime, but I've never managed to make IEFBR14 do it.
>
> Tony H.
I guess you could run a 32 bit IEFBR14 program on a 64 bit z/OS system
and not save the upper half of the registers.
-- 
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...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: DFHSM MIGRATE MYSTERY

[Mike Schwab]

You can requre that a successful SMS backup before it allows the
dataset to be migrated.

On Fri, Nov 19, 2010 at 8:00 AM, willie bunter  wrote:

> When the batch job is executed all the dsns (these are all VSAM dsns) are 
> migrated ML2 - including those that were created this morning before the 
> migrate was done.  According to the Migration Attributes shouldn't those dsns 
> which were created today & yesterday not be migrated?
> Could someone help me understand where else I should look.
>
> Thanks in advance for your help.

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

Re: IEFBR14

[Mike Schwab]

On Fri, Nov 19, 2010 at 2:28 PM, Eric Bielefeld  wrote:
> Just out of curiousity, I browsed SYS1.LINKLIB(IEFBR14).  It looks the same 
> as it did probably about 25 years ago when I last looked at it.  The code is 
> basically 8 bytes:
>
> 1BFF 07FE  
>
> 1B is Subtract register - FF is subtracting R15 from itself, giving 0 - the 
> return code.  07 is Branch on Condition to the address in R14.
>
> --
> Eric Bielefeld
> Systems Programmer
>

http://en.wikipedia.org/wiki/IEFBR14

They went back to that version last year.
-- 
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...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Potent ial heresy regarding E and L m acros etc. (Was: WTO ABEND D23 help)

[Mike Schwab]

Can you do a CL64'initial text' for the definition and have the
execute definition overlay the initial text as needed?

On Mon, Nov 22, 2010 at 12:16 PM, Edward Jaffe
 wrote:
> On 11/22/2010 9:58 AM, Paul Gilmartin wrote:
>>
>> No, no, no!  I was referring not to the syntax of the macro instruction,
>> but to the generated argument list to the SVC, which places options after
>> the variable-length text string, requiring convolutions to supply a
>> text string of unpredictable length in the MF=E form.
>
> An ugly design for sure. Those options were clearly an add-on to the
> original design. I know that WTO can be a frustrating interface. The doc
> can't possibly describe all of the nuances. Often, you have to experiment
> with numerous compiles (and MNOTEs or assembly errors) until you finally get
> what you want.
>
> Have you tried using the TEXT= keyword?
>
> --
> 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
>



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

Re: Tape copy from 3590 to 3490

[Mike Schwab]

http://www.comco-inc.com/ibm-3590-h11-p29968.html

Advertising a 3592 (700GB) for 5,700, so a used 3590 (60GB) should be
much cheaper, but not quoted.

On Mon, Nov 22, 2010 at 1:36 PM, Andre Massena
 wrote:
> Eric,
>
> afraid not. Since the middle of October, it is bye bye to "old" media i.e.
> 3480 / 3490's etc.
>
> I would have have preferred the customer to have ordered the ServerPac with
> Internet Delivery. The customer is however a government agency and there is
> gnashing of teeth and all sorts of politics before a port gets opened in the
> firewall.
>
> I think he will have no choice but for Electronic Delivery or DVD.
>
> Thanks for the suggestion.
>
> Andre
-- 
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...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: IBM messages

[Mike Schwab]

On Tue, Nov 23, 2010 at 2:17 PM, Shmuel Metz (Seymour J.)
 wrote:

> This is complicated by documentation that refers the reader to the
> explanation of a different message, or even to a different manual, for
> explanations of return codes and reason codes. IBM has tools like
> DAIRFAIL and bpxmtext; why can't they consistently use them to produce
> more helpful messages?
>
VSAM ERROR CODES - Print the text from the manual for the return code
/ reason code.
-- 
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...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: SI and MI MIPS

[Mike Schwab]

Then what I would recommend is going to the next box with the same
MIPS rating (possibly fewer processors) and be ready to upgrade with
additional processors if you have too.

On Tue, Nov 23, 2010 at 2:53 PM, Ted MacNEIL  wrote:
>>I did not mean to imply that it was -meaningful-.
>>Instead, in the proper context, such a number can be -useful-.
>
> With all due respect, for what?
> If it's not meaningful how can it be useful.
>
> LSPR/zPCR have, unless it's change recently, only tested to 32 CPUs.
> The rest they 'straight line' the MP effect, which is bogus!
>
> The MP effect is a regression curve and NOT linear.
>
> I asked our IBM rep, a few years ago for LSPR for machines above 32, and he 
> told me that you had to use zPCR for that.
>
> Since they don't test all workloads, and they project incorrectly after 32, 
> what validity do these figures have?
>
> And, the 'Technology Dividend' just obsfucates the issue.
>
> If understanding the capacity of a given family/model is tough for a capacity 
> professional, what happens when a senior manager has to make a decision to 
> spend millions based on a meaningless indicator?
>
> I don't know about you, but it scares me, since it impacts the bottom line.
>
> I've had arguments since IBM introduced tier-based pricing in 1984, and I 
> fear they will never go away.
>
> But, I think we have to convince IBM, and the ISVs, to go back to flat-rate 
> pricing.
>
> Hah! NOT in my life-time!
>
> -
> Ted MacNEIL
> eamacn...@yahoo.ca
>
> --
> 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
>



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

Re: Z10 BC issue

[Mike Schwab]

You init a volume on the new machine with a 1 track vtoc and volser,
vary it online, and the restore has a dd statement with dasd volser.
The physical restore will overwrite the VTOC you created with ICKDSF.

If you don't have a running system connected to the new dasd, you can
do a Stand Alone ICKDSF and Stand Alone ADRDSSU.

On Mon, Nov 29, 2010 at 9:12 AM, SrinivasG  wrote:
> Thanks Brian for the answers.
>
> Will it be ok restoring the volumes for the first time from ZOS? How does the 
> restore job know on which device address to restore the ZVM volume? Same for 
> the Linux Volumes?
>
> I will check the ZVM and Z Linux lists as well as suggested by you.
>
> Regards,
> Srinivas G
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf 
> Of Brian Westerman
> Sent: Monday, November 29, 2010 4:59 PM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: Z10 BC issue
>
> Assuming that you have made the changes to the z/VM system (if any are
> required) so that it also understands the new device addresses, everything
> will be fine once you get the backup job set up correctly for the VM volumes
> (see below).
>
> Make sure that you take Physical volume backups of the packs (not logical)
> and restore them as FULL volume.  For VM volumes you (should) specify
> CPVOLUME to let DSS know that it's playing with a VM volume :
> 3390 mod3:
> DUMP -
>     INDD(DASD)            -
>     OUTDD(TAPE1)          -
>     ADMINISTRATOR         -
>     CONCURRENT            -
>     CPVOLUME              -
>     OPTIMIZE(4)           -
>     TRKS(0,0,3338,14)
>
> 3390 mod9
> DUMP -
>     INDD(DASD)            -
>     OUTDD(TAPE1)          -
>     ADMINISTRATOR         -
>     CONCURRENT            -
>     CPVOLUME              -
>     OPTIMIZE(4)           -
>     TRKS(0,0,10016,14)
>
>
> You can get a full description of how to do this type of copy on the VM list
> and the Linux list has a similar one for copying the Linux volumes (which
> doesn't use the CPVOLUME, it's just a full physical backup and restore)
>
> Brian
>
> --
> 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
>
>  CAUTION - Disclaimer *
> This e-mail contains PRIVILEGED AND CONFIDENTIAL INFORMATION intended solely
> for the use of the addressee(s). If you are not the intended recipient, please
> notify the sender by e-mail and delete the original message. Further, you are 
> not
> to copy, disclose, or distribute this e-mail or its contents to any other 
> person and
> any such actions are unlawful. This e-mail may contain viruses. Infosys has 
> taken
> every reasonable precaution to minimize this risk, but is not liable for any 
> damage
> you may sustain as a result of any virus in this e-mail. You should carry out 
> your
> own virus checks before opening the e-mail or attachment. Infosys reserves the
> right to monitor and review the content of all messages sent to or from this 
> e-mail
> address. Messages sent to or from this e-mail address may be stored on the
> Infosys e-mail system.
> ***INFOSYS End of Disclaimer INFOSYS***
>
> --
> 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
>



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

Re: I would love to know what went wrong at NAB

[Mike Schwab]

On Tue, Nov 30, 2010 at 12:54 AM, Sheldon Davis  wrote:
> I would love to know how a corrupt system file in a parrallel sysplex can 
> affect
> a payroll system
>
> http://www.channelregister.co.uk/2010/11/29/nab_mainframe_cockup/

That was not payroll.  That was a bank.  They screwed up all
transactions for a week after a conversion and fallback.  I would be
really curious as to how the database was functioning without crashing
while processing all those bad transactions.

Almost like they were processing the same old (duplicate) transactions
(?same GDG?) on one system while another system was putting new
transactions into newer files (GDG +1) which the other system did not
see (many missing transactions).  Maybe if they said which days were
repeated and which days were missed we could learn more?

Does the sysplex carry catalog updates (new file names) across
systems?  Are there Coupling Facility links that spread catalog
updates to other systems?

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

Re: Question concerning CMF reporting of CPU Delay

[Mike Schwab]

On Tue, Nov 30, 2010 at 9:35 AM, O'Brien, David W. (NIH/CIT) [C]
 wrote:
> Hi Kees,
>
> 3 physical CPs
> 2 Prod LPARs each with 3 LPs
> 1 Test LPAR with 2 LPs
> 1 Sandbox with 1 LP
>
> So we have 9 LPs competing for 3 CPs. Fortunately 3 of those LPs are little 
> used.
> The relative weights of the Prod LPARs are 45 and 30.

Maybe a 42 / 33 weight would work a little bit better?

> The LPAR reporting the problem is the one with 30, no surprise there.
> The Test LPAR has a weight of 15 while the Sandbox has a weight of 10 and 
> seldom use their relative share.
>
> I have suggested that a 2:1 LP to CP ratio would be more efficient but was 
> told the faster CP make the 2:1 ratio obsolete. Makes no sense to me but then 
> I'm the DASD guy. Every problem is HSM until proven otherwise.
>
> Thank You,
> Dave O'Brien
> NIH Contractor

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

Re: CA1, tape pooling, and SMS controlled Libraries

[Mike Schwab]

On Tue, Nov 30, 2010 at 3:04 PM, Darth Keller  wrote:
> We've recently installed an HDS MDL.  In the course of the installation,
> we decided we wanted to stage things so that down the road we can do
> remote replication of tape.  Basically we don't intend to replicate the
> entire library - we'll replicate tapes which have been identified as
> needing off-site vaulting.  We've done this by implementing CA1
> sub-pooling which allows us to direct a sub-set of datasets to a specific
> range of tape volsers.  The volser's to be vaulted all start with the
> first character of 'V" and the sub-pool is named "DRVAULT".
>
> The intention is that down the road at some point, we'll have another MDL
> at a remote site and we'll use 'magic' HDS functionality to replicate the
> "V" volumes to the remote MDL.
>
> This has been running successfully since late July.  However, we've
> recently had 2 different jobs abend because it appears that CA1 is calling
> for a tape from the wrong aub-pool.  The job is re-submitted approx. 15
> minutes later and runs successfully - no changes to the job, no changes to
> the CA1 NSM table, no changes to the MDL in the 15 minute interval.
>
> This is what the messages look like when it runs successfully:
>
> *IEC501A M 841C,PRIVAT,SL,COMP,jobname,
> *TMS002  IEC501A M 841C,DRVAULT,SL,COMP
>  IECTMS9 841C,V95538,jobname,OUTFILE ,
>
>
> The is the sequence of messages when it runs amok:
>
> *IEC501A M 8401,PRIVAT,SL,COMP,jobname,
> *TMS001  IEC501A M 8401,PRIVAT,SL,COMP,jobname,
>  IECTMS3 8401,M33439,IS NOT SCRTCH (80)
>  IEC518I SOFTWARE ERRSTAT: REJTMS   8401,M33439,SL,jobname,
>
> So we opened an issue with CA1 & got the following response:
>   "Since you have this defined as a manual tape library subpooling is not
> supported.  CA1 subpooling is NOT supported with IBM SMS-managed tape
> libraries (ATL or
> MTL)."
>
> I find this response interesting as I'm not seeing how an SMS Library
> comes into play in this case -  the library is actually returning a
> scratch tape from the pool CA1 is requesting - for some reason, it appears
> to me that CA1 is sometimes requesting the wrong sub-pool.
>
> So my question is anyone else using CA1 sub-pooling and SMS-managed tape
> libraries?
> thanks - dd keller

Our site used to get this too, assigning volumes from the wrong pool.
Immediately after you get the error message see how many scratch tapes
you have and how many in the various sub pools.  You might be running
faster than the VTS is scratching tapes.

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

Re: I would love to know what went wrong at NAB

[Mike Schwab]

On Tue, Nov 30, 2010 at 7:01 PM, Wayne Bickerdike  wrote:

> My same source related the tale of a person in same bank who received
> an EBCDIC file, opened it in Windows and saved it back as ASCII. The
> file was duly transferred for processing on the mainframe. Most of the
> packed data was garbaged ..
>
> Oh my, dumb and dumber

Here is an idea to bounce around.  z/OS Unix System Services does a
lot of work converting ASCII to EBCDIC and back.  z/Linux works all in
ASCII.  Why not get 4 new instructions that work with PD<=> ASCII like
the PD <=> EBCDIC instructions PACK, UNPK, ED, EDMK, but with an A
suffix to denote ASCII character.  Conversion from Packed to binary
would be the same.  Assembler would get new instructions.  z/OS would
need to know if a file was ASCII for proper translation when printing
it.

Shoot, do we want to limit this to just ASCII?  Could we do some sort
of Unicode translation?  Have GPR2 point to a memory area that
indicates how many bytes per digit, then the 10 characters for 0-9?
EDMK would overlay this address anyway, so ok for input.  Would we
want the number of digits?  I.E. 10 for decimal, 8 for octal, 16 for
hexadecimal (good for dumps!), up to 36 to encode numbers into a
character string in some way (a basic encoding technique).  Would
Oriental languages want more than 255 numbers?  Save the UNICODE value
in the owner field, or a new field in the VTOC?

2 number of Bytes per digit, 2 number of digits, Digit 0, Digit 1,
Digit 2, ..., Digit N.

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

Re: EPO's (Emergency Power Off)

[Mike Schwab]

On Sat, Dec 4, 2010 at 10:05 AM, Rick Fochtman  wrote:
> ---
> I had almost the exact same experience during the "CHICAGO FLOOD" of 1992,
> only our power was down for 2 weeks! Edison dropped the power without
> warning to keep water leakage from causing transformer explosions and we
> didn't HAVE a UPS. Edison had to inspect every transformer vault in the Loop
> before they would restart power and there were still a number of problems.
>
> Rick

The site manager who was in charge of the building when the UPS was
installed had retired.  The site had a problem develop with the
spinning motor that converted battery power to A/C for the data
center.  A bearing was out and the motor could not turn.  They
replaced the bearing a couple of times but kept failing.  So they
ordered other replacement parts and were on Utility power only until
it could be fixed.  Weekly UPS testing was disabled.  Sunday 1730,
power went out.  All power in the neighborhood was on, no breakers
were thrown.  1800 power came back on and restarted the systems.  2
mainframes, 2 ESS F20s, etc.  Lost a lot of time and restarting
programs.  Monday 1730, power went out.  Same thing with no other
outages, no breakers.  1800 power came back on and restarted the
systems.

They kept looking for things that could turn the power off, but did
not find anything.  Still waiting for parts.The next Sunday at 1730,
power went out again.  1800 back on.  They finally tracked down a
computer that tested the UPS by turning off utility power.  They added
a check to see if there was UPS power before turning it off.  Monday
at 1730, power went out again, 1800 back on.  They found a second
computer programmed the same way and changed it.

Parts arrived, and while installing the parts, noted the shaft was
worn and they had to fix the shaft to stop tearing up the bearings.
We started moving equipment out of that site into the primary site.
We started searching for another site further away from the primary.
We got one about 150 miles away instead of 2 miles.  We close down
this site next summer (being converted for use for x86/x64/p servers).

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

--
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: Philosophy: curiousity question

[Mike Schwab]

I have on a USB thumb drive an ICKDSK init job and ADRDSSU restore of
the IPL volumes and DR catalog.  Connect the catalog to the starter
system, init the volumes for the restore.  Then we have a restore job
of the base system volumes using the catalogs and the inited volumes.
Edit system parameters on the volumes and IPL out systems.

On Sat, Dec 4, 2010 at 1:14 PM, John McKown  wrote:
> A good point. What I may really need is a parallel environment with
> automatic synchronization. I don't want it mainly or only on the z
> because: (1) what if the z is unavailable; (2) it costs real money, in
> terms of MSU usage for which we are billed. And, in a D.R. situation, do
> we want to be dependent on the z for doc? Or on Windows? Well, IMO -
> neither! So I need an "offline" version of the Wiki residing on a CD
> which can be burned and put into the D.R. buckets instead of paper. If
> it is all HTML (Wiki to Html "print" of the entire Wiki), then the CD
> could be inserted into a local PC running any browser (Windows, Mac,
> Linux) and read.
>
> Thanks for some very good thoughts about usefulness in a D.R. situation.

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

Re: Philosophy: curiousity question

[Mike Schwab]

Open the USB text file with Notepad, select all and copy, paste into a
3270 member edit session.

On Sat, Dec 4, 2010 at 8:39 PM, Paul Gilmartin  wrote:
> On Sat, 4 Dec 2010 16:29:20 -0600, Mike Schwab wrote:
>
>>I have on a USB thumb drive an ICKDSK init job and ADRDSSU restore of
>>the IPL volumes and DR catalog.  ...
>>
> How do you mount it?
>
> -- gil

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

Re: Philosophy: curiousity question

[Mike Schwab]

Just the starter system at the Hot Site.

On Sun, Dec 5, 2010 at 8:43 AM, Paul Gilmartin  wrote:
> On Sat, 4 Dec 2010 21:23:39 -0600, Mike Schwab wrote:
>
>>Open the USB text file with Notepad, select all and copy, paste into a
>>3270 member edit session.
>>
> Ah, so you had a working z/OS.  I was trying to envision a standalone
> restore from the thumb drive.  Maybe next year's model.
>
> Why not just keep the jobs on z/OS data sets?
>
>>On Sat, Dec 4, 2010 at 8:39 PM, Paul Gilmartin  wrote:
>>> On Sat, 4 Dec 2010 16:29:20 -0600, Mike Schwab wrote:
>>>
>>>>I have on a USB thumb drive an ICKDSK init job and ADRDSSU restore of
>>>>the IPL volumes and DR catalog.  ...
>>>>
>>> How do you mount it?
>
> -- 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
>



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

Re: Possible to override PGM= in PROC?

[Mike Schwab]

If you change the proc to
//PROCNAME  PROC PROG=IEFBR14
//STEPNAME EXEC PGM=&PROG
// PEND
then
//EXECUTE EXEC PROC=PROCNAME, PROG=IEBGENER
will work.

On Wed, Dec 8, 2010 at 7:20 PM, Charles Mills  wrote:
> Am I reading the JCL reference correctly that there is no way to override an
> EXEC statement or the PGM= parameter of an EXEC statement in a cataloged
> procedure? No way to do something like
>
> //STEP1    EXEC   MYPROC,PGM.PROCSTP1=IEFBR14
>
> Or
>
> //STEP1    EXEC   MYPROC
> //STEP1.PROCSTP1 EXEC PGM=IEFBR14
>
> (I am assuming here not modifying the proc, which does not already have an
> &PGM symbol.)
>
> Charles
>
> --
> 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
>



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

Re: Help with S237-04 on Tape

[Mike Schwab]

DCB=EROPT=SKIP might work.  Skips bad blocks.  Not sure if it handles
the missing trailer label.

On Sun, Dec 12, 2010 at 9:16 AM, Paul Gilmartin  wrote:
> On Sun, 12 Dec 2010 04:05:51 -0500, Lizette Koehler wrote:
>
>>I had someone cancel an SMF dump job (z/OS V1.11) while it was writing its
>>output.  Now when I try to read it - S237-04 invalid block count.
>>

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

Re: Automate ISMF report

[Mike Schwab]

IDCAMS DCollect has space usage.  By volume and by dataset.
CBTTAPE.org has reports that analyze it.

A listcat dataset is a bit harder to anaylize becuase it lists each extent.

On Mon, Dec 13, 2010 at 3:23 PM, David G. Schlecht
 wrote:
> Hi All,
>
> I'm trying to automate the ISMF Storage Group LISTVAL report but can't find 
> the magic. Specifically, I'm looking for space usage data. This seems like it 
> should be a pretty common request by storage customers but I have found 
> nothing in the docs and the only thing I find here or on the IBM site are 
> unusable for this purpose. What do you gurus use to extract ISMF data in 
> batch? If I've overlooked the right doc, can you point me in the right 
> direction?
>
> Thanks in advance for any info you might have.
>
> - David
>
>  + David G. Schlecht
>  + Information Technology Professional
>  + State of Nevada
>  + Department of Information Technology
>  + 775.684.4328
>  This communication, including any attachments, may contain
>  confidential information and is intended only for the individual or
>  entity to whom it is addressed. Any review, dissemination or copying
>  of this communication by anyone other than the intended recipient is
>  strictly prohibited. If you are not the intended recipient, please
>  contact the sender by reply e-Mail and delete all copies of the
>  original message.
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>



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

Re: ftp'ing SYSOUT - binary data?

[Mike Schwab]

You have the M for machine control codes.  And you have APF Advanced
Print Functions that print images on laser printers.  And Xerox
printers have their language, and a couple of other graphic printing
standards.

On Mon, Dec 13, 2010 at 6:05 PM, John McKown  wrote:
> Maybe not the clearest Subject:, sorry. But I'm wondering if anybody ftp
> downloads SYSOUT data which contains non-printable characters and so
> would be "ruined" if a normal EBCDIC->ASCII translation is done?
>
> I'm looking at the possibility of maybe considering try to see (
> if I can write a UNIX based SAPI application which can copy SYSOUT from
> a job on the JES SPOOL to "stdout". Now, for doing this within z/OS
> itself, it is no problem. Just copy the data. Oh, but wait, if the data
> can contain binary (non printable) data, should there be a BINARY
> option? Hum, if so, what about "line endings"? Perhaps I need three
> options: TEXT, BINARY, and the new "RECORD" as defined by IBM which has
> a prefix of 0x00LL (four byte length field with first byte forced to
> be 0x00).
>
> Now, a problem arises. I also want to use ssh from a Linux desktop to
> z/OS to copy this data from the SPOOL to Linux similar to Dovetailed
> Technologies' "fromdsn" command. Which means that if anything other than
> TEXT is allowed, I must write a ssh subsystem to do a binary transport
> of the data from z/OS to Linux because the normal z/OS ssh interface
> does an automatic translation between EBCDIC and ASCII. The plus of
> using a subsystem would also be total control of the translate table for
> non-US languages, again like fromdsn. The minus is the need to actually
> write and debug the code. And to write a Linux (and perhaps other OS
> flavored version) command to talk to z/OS via this subsystem.
>
> I had considered two possible commands: "jesls" which basically does an
> "ls" type operation, but accesses the SPOOL. And a "jesout" which would
> copy one or more SPOOL entries for a job to "stdout".
>
> I have not yet really done any design. I plan to crib ideas from
> Dovetailed Technologies documentation of their "fromdsn" command as well
> as their enhanced sftp server. Is that valid? I'm actually sortof
> "stealing" their design ideas. I do feel some moral qualms about that.
> But I don't know if a UI of something that basic is really
> copyright-able. I guess I should ask them for permission. But what if
> they say "No"?
>
> --
> 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
>



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

Re: Reporting on CPU usage of LINUX and other special processors

[Mike Schwab]

I know our z/OS system can track non/z/OS LPAR statistics.  Not sure
if VM / VSE does the same reports.

On Thu, Dec 16, 2010 at 12:39 AM, Ed Gould  wrote:
> I do not recall seeing this discussed before (possibly I missed it) but I 
> have been asked by a "client" that is interested in getting one of the new 
> processors about how to track and report usage of all the different type of 
> processors that are available. They do not want to buy a processor but also 
> want to be able to justify keeping them. I have not heard this discussed yet 
> but how does one keep track of usage? A live (RMF type) is not really really 
> needed but a batch report would be fine. Maybe later on an RMF type program 
> might be needed but that is far ahead in planning right at the moment. Maybe 
> a SHARE session would be nice as well (if there hasn't already been one).
> Ed
>
-- 
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...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Why not STORAGE OBTAIN LOC=(31,64)?

[Mike Schwab]

On Thu, Dec 16, 2010 at 11:47 PM, Edward Jaffe
 wrote:
> On 12/16/2010 9:34 PM, Charles Mills wrote:
>>
>> So would a person not be better off -- well, would not the MVS system "be
>> better off" -- have more options -- by specifying LOC=(31,64)? Why is it
>> not
>> the default?
>
> LOC=(,64) can't be the default because it would break some existing
> production programs.
>
> --
> 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/
>
http://publib.boulder.ibm.com/infocenter/zos/v1r10/index.jsp?topic=/com.ibm.zos.r10.ieaa600/iea2a68069.htm
-- 
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...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: DFSORT - Compare and report changed records from 2 huge files

[Mike Schwab]

On Sat, Dec 18, 2010 at 12:00 PM, Richard L Peurifoy
 wrote:
> On 12/18/2010 2:15 AM, adarsh khanna wrote:
>>
>> I have a situation where I need to report updated records from an
>> Hi,
>>
>> I have a situation where I need to report updated records from an IMS
>> database
>> everyday.
>> On the first day, I run an IMS scan utility to report everything on the
>> IMS DB
>> (around 30 million records).
>>
>>  From second day onwards, I have to scan the IMS DB again and compare it
>> with the
>> previous days file to report any updated records.
>>
>> One solution is to use VSAM i.e. store all the records (30 million) in a
>> VSAM
>> KSDS file (in the initial run) and compare each record on it everyday with
>> the
>> scanned file subsequently.
>>
>> I want to use DFSORT to compare and report only changed records.
>> My question is will DFSORT solution offer any advantage to VSAM one?
>>
>> Thanks in advance
>>
>> Adarsh Khanna
>
> Have you considered using the IMS log to find changed records?
>
> --
> Richard
>
What, no timestamp?

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

Re: curiousity question: in-house doc

[Mike Schwab]

On Tue, Dec 21, 2010 at 7:16 PM, Paul Gilmartin  wrote:
> On Tue, 21 Dec 2010 18:42:10 -0600, John McKown wrote:
>
>>I'm off on one of my wild hares again. Or is that "wild hair"? No, my
>>hair is mostly gone, so it must be hare.
>>
>>All our "in house" documentation that we in Tech Services write is
>>basically written "ad hoc" by us using MS Word and kept in a Windows LAN
>>directory. Being an admitted anti-MS bigot, I really don't much like
>>this. Not that anybody else cares, of course. I really don't much care
>>for any "word processing" format for things which, IMO, should be well
>>structured.
>>
> Are you familiar with:
>
>    http://en.wikipedia.org/wiki/Literate_programming
>
> ???
>
> -- gil
>
Personally, I like the RTF Rich Text Format.  No binary control codes,
english key words in <> delimited strings.
http://en.wikipedia.org/wiki/Rich_Text_Format
-- 
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...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Off topic Friday - Why did I do this?

[Mike Schwab]

On Wed, Dec 22, 2010 at 3:28 PM, Rick Fochtman  wrote:
> Or another common line: Now that I've got it all together, I've forgotten
> where I put it.
>
> A line that was attributed to Ted Kennedy, probably falsely: "I've got the
> whole Senate in my pocket. Now if I could just remember where I left my
> pants.."
>
> Rick
Under the bridge to http://en.wikipedia.org/wiki/Chappaquiddick_Island ?
-- 
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...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Paging Jay Maynard

[Mike Schwab]

Speak of the Devil, and he makes time magazine.

http://newsfeed.time.com/2010/12/22/internet-legend-tron-guy-banned-from-seeing-tron-legacy-in-famous-suit/

On Wed, Dec 22, 2010 at 10:16 PM, zMan  wrote:
> On Wed, Dec 22, 2010 at 7:18 PM, Shmuel Metz (Seymour J.)
>  wrote:
>> What is your new e-mail address? Thanks.
>
> Speaking of Jay, I saw a neighbor walking a dog last night. The dog
> had a coat on with white reflective piping around it: my immediate
> thought was, "Hey, a Tron suit!"
> --
> 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...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>



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

Re: Paging Jay Maynard

[Mike Schwab]

And a CNN interview in costume.
http://newsstream.blogs.cnn.com/2010/12/21/tron-legacy-how-to-look-28-years-younger/?on.cnn=2

On Thu, Dec 23, 2010 at 12:06 AM, Chris Craddock  wrote:
> On Wednesday, December 22, 2010, Mike Schwab  wrote:
>> Speak of the Devil, and he makes time magazine.
>>
>> http://newsfeed.time.com/2010/12/22/internet-legend-tron-guy-banned-from-seeing-tron-legacy-in-famous-suit/
>>
> My wife pointed that out to me and she was utterly shocked when I
> casually replied "oh yeah, I know Jay"
> Somehow she didn't really see it as a brush with celebrity. (sorry Jay)
>
> CC
-- 
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...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Paging Jay Maynard

[Mike Schwab]

I think they had scheduled the census for taxation for Passover, when
most of the Jewish people would have gathered in their hometown
anyway.  Easter is now celebrated on same day as Passover.

On Thu, Dec 23, 2010 at 3:12 PM, Mark Hammond  wrote:
> That's debatable.  I've heard it was probably in Sept.
>
> Bottom line: we don't know when it was, nor does it matter; Jesus is
> still the reason for the season.
>
> (Co-opting a pagan holiday, though likely, is no longer relevant.)
>
> Mark Hammond
>
> -Original Message-
> From: Gerhard Postpischil [mailto:gerh...@valley.net]
> Sent: Thursday, December 23, 2010 1:11 PM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: Paging Jay Maynard
>
> On 12/23/2010 1:42 PM, Eric Bielefeld wrote:
>> To all: Have a wonderful and Merry Christmas, and remember the
>> reason for the season! I suspect Jesus gets lost in the shuffle
>> and hubub of Christmas way too often.
>
> I appreciate, and would like to reciprocate, the sentiment, but
> Jesus was born in Spring, and we're celebrating now only because
> church elders co-opted a "pagan" celebration of the solstice.
>
> 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
>



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

Re: Paging Jay Maynard

[Mike Schwab]

http://www.youtube.com/watch?v=GkHNNPM7pJA

Joseph & Mary & Jesus reenacted with Google, Wikipedia, Twitter.

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