Re: [EXTERNAL] Re: IRRDBU00 format
Cheers. "Not really, both Lou and myself referred you to v2.3, your book is v2.1." Hold on there, let me put on my nerd glasses – Vignesh Mainframe Infrastructure -Original Message- From: IBM Mainframe Discussion List On Behalf Of Elardus Engelbrecht Sent: 28 November 2018 06:51 To: IBM-MAIN@LISTSERV.UA.EDU Subject: [EXTERNAL] Re: IRRDBU00 format Sankaranarayanan, Vignesh wrote: >Elardus, I was looking at >https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos >.v2r1.icha300/dbutypes.htm >Heh, looks like the answer is within the same book... Not really, both Lou and myself referred you to v2.3, your book is v2.1. Anyways, I see the 'pictures' you're referring, they're useful, because they show the relationship between the different record types. But for myself, I rather use other parts of the books where the exact layout of each record type is described. You have asked for 'format of the different record types', here, for example, is the specific layout of the User Basic data record (0200) which is listed here (for v2.3): https://www.ibm.com/support/knowledgecenter/SSLTBW_2.3.0/com.ibm.zos.v2r3.icha300/usr.htm#rec0200 Just browse around and you will also see other record types. Groete / Greetings Elardus Engelbrecht -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN MARKSANDSPENCER.COM Unless otherwise stated above: Marks and Spencer plc Registered Office: Waterside House 35 North Wharf Road London W2 1NW Registered No. 214436 in England and Wales. Telephone (020) 7935 4422 Facsimile (020) 7487 2670 www.marksandspencer.com Please note that electronic mail may be monitored. This e-mail is confidential. If you received it by mistake, please let us know and then delete it from your system; you should not copy, disclose, or distribute its contents to anyone nor act in reliance on this e-mail, as this is prohibited and may be unlawful. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IRRDBU00 format
Sankaranarayanan, Vignesh wrote: >Elardus, I was looking at >https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.icha300/dbutypes.htm >Heh, looks like the answer is within the same book... Not really, both Lou and myself referred you to v2.3, your book is v2.1. Anyways, I see the 'pictures' you're referring, they're useful, because they show the relationship between the different record types. But for myself, I rather use other parts of the books where the exact layout of each record type is described. You have asked for 'format of the different record types', here, for example, is the specific layout of the User Basic data record (0200) which is listed here (for v2.3): https://www.ibm.com/support/knowledgecenter/SSLTBW_2.3.0/com.ibm.zos.v2r3.icha300/usr.htm#rec0200 Just browse around and you will also see other record types. Groete / Greetings Elardus Engelbrecht -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: [EXTERNAL] Re: IRRDBU00 format
Thanks Lou. Elardus, I was looking at https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.icha300/dbutypes.htm Heh, looks like the answer is within the same book... – Vignesh Mainframe Infrastructure -Original Message- From: IBM Mainframe Discussion List On Behalf Of Elardus Engelbrecht Sent: 27 November 2018 13:40 To: IBM-MAIN@LISTSERV.UA.EDU Subject: [EXTERNAL] Re: IRRDBU00 format Sankaranarayanan, Vignesh wrote: >Can you please point me to a link for the format of the different record types >in IRRDBU00. >From what I see, I could find only some pictures for some parts of some record >types. From where? Please post the source of 'pictures for some parts of some record types'. You got a good and useful PDF link from Lou Lousee. Here is the KC version (this one is the TOC entry): https://www.ibm.com/support/knowledgecenter/SSLTBW_2.3.0/com.ibm.zos.v2r3.icha300/toc.htm I think you should just try out to use/navigate the KC and do your own researches. Groete / Greetings Elardus Engelbrecht -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN MARKSANDSPENCER.COM Unless otherwise stated above: Marks and Spencer plc Registered Office: Waterside House 35 North Wharf Road London W2 1NW Registered No. 214436 in England and Wales. Telephone (020) 7935 4422 Facsimile (020) 7487 2670 www.marksandspencer.com Please note that electronic mail may be monitored. This e-mail is confidential. If you received it by mistake, please let us know and then delete it from your system; you should not copy, disclose, or distribute its contents to anyone nor act in reliance on this e-mail, as this is prohibited and may be unlawful. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Share Phoenix speaker
https://twitter.com/IBMRedbooks/status/1067504726986694658 Shuttle Commander Mark Phillips. His wife was shot at a public event. -- Mike A Schwab, Springfield IL USA Where do Forest Rangers go to get away from it all? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: So much for THAT excuse | Computerworld SHARK TANK
https://mashable.com/2016/09/06/balls-stuck-ikea-chair/#7anJiUc2Bqqn Trapped in just the right size hole. https://www.youtube.com/watch?v=gOcXcGaFHzs Stuck between magnets. https://www.dailymail.co.uk/news/article-5531987/Hotel-guest-gets-testicles-trapped-plastic-chair-Spain.html Caught in slat. https://listverse.com/2013/08/25/10-grotesque-examples-of-genital-mutilation/ 10 cases of forcible removable. On Tue, Nov 27, 2018 at 7:41 PM Phil Smith III wrote: > > Tony Harminc wrote, in part: > > >These days it's almost impossible to get any mainstream search engine to do > >exactly what you want. > > > > Though Google Verbatim mode is pretty close. > > > > I laughed a few years ago when there was a story about some poor guy who sat > in a defective chair that crushed his testicles. I was > trying to find the article. My search terms included "testicles", and Tha > Goog kept returning hits with the word "ball" in > it-tennis, golf, and dodge, among others. Not what I wanted! > > > > We now return you to your completely off-topic thread. > > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Mike A Schwab, Springfield IL USA Where do Forest Rangers go to get away from it all? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IND$FILE -- where did the name come from?
That link doesn't tell me anything about the name that I can see. Somewhere I think I still have a copy of the one and only manual that documents the protocol. It was part of some early version of PCOMM, IIRC, and is very rare. Still doesn't explain the name. Charles' explanation might be it, but we still don't have confirmation. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: So much for THAT excuse | Computerworld SHARK TANK
Tony Harminc wrote, in part: >These days it's almost impossible to get any mainstream search engine to do >exactly what you want. Though Google Verbatim mode is pretty close. I laughed a few years ago when there was a story about some poor guy who sat in a defective chair that crushed his testicles. I was trying to find the article. My search terms included "testicles", and Tha Goog kept returning hits with the word "ball" in it-tennis, golf, and dodge, among others. Not what I wanted! We now return you to your completely off-topic thread. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Highlighting of member names in PDS member list
On Tue, 27 Nov 2018 17:22:04 -0500, Steve Smith wrote: >What ought to be an RFE or RCF is for ISPF to show real record counts up to >999,999 on all its relevant panels. > >I have wondered why the highlighting? It just seems incongruous. But my >biggest wonder is why "extended stats" are considered so dangerous they >have to be specially enabled; something few systems groups in my experience >bother doing. > Might extended stats break any GUPInterfaces? Or is IBM biding its time until any IBM products that depend on the non-extended format have gone end-of-service? Is there any administrators guide that gives an explicit warning? -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Highlighting of member names in PDS member list
What ought to be an RFE or RCF is for ISPF to show real record counts up to 999,999 on all its relevant panels. I have wondered why the highlighting? It just seems incongruous. But my biggest wonder is why "extended stats" are considered so dangerous they have to be specially enabled; something few systems groups in my experience bother doing. sas -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IND$FILE -- where did the name come from?
On 11/27/2018 4:58 PM, Mike Schwab wrote: http://gsf-soft.com/Documents/IND$FILE.html On Tue, Nov 27, 2018 at 3:48 PM Charles Mills wrote: Even after his passing, Gilbert continues to contribute. RIP, notre ami. Regards, Tom Conley -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IND$FILE -- where did the name come from?
Makes sense. One would expect anything in d' money file to be marked 'Corporate Confidential' I know, pretty bad. From: IBM Mainframe Discussion List on behalf of Edward Finnell <000248cce9f3-dmarc-requ...@listserv.ua.edu> Sent: Tuesday, November 27, 2018 4:58 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: IND$FILE -- where did the name come from? It's been marked 'Corporate Confidential' for years. In a message dated 11/27/2018 2:33:46 PM Central Standard Time, li...@akphs.com writes: IND$FILE got its name? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IND$FILE -- where did the name come from?
http://gsf-soft.com/Documents/IND$FILE.html On Tue, Nov 27, 2018 at 3:48 PM Charles Mills wrote: > > Is IND the component prefix for PCOMM? So IND$FILE's name is kind of like > IEBCOPY's name? Prefix + function? > > Charles > > > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Behalf Of Phil Smith III > Sent: Tuesday, November 27, 2018 3:33 PM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: IND$FILE -- where did the name come from? > > Anyone know how IND$FILE got its name? Just randomly wondered today. > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Mike A Schwab, Springfield IL USA Where do Forest Rangers go to get away from it all? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IND$FILE -- where did the name come from?
It's been marked 'Corporate Confidential' for years. In a message dated 11/27/2018 2:33:46 PM Central Standard Time, li...@akphs.com writes: IND$FILE got its name? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: OS64_NOSTACK
> So IBM mentions OS64_NOSTACK and so does my boss but I can't find doc on it. > Can someone help me ? Pierre, Check this https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.2.0/com.ibm.zos.v2r1.cbclx01/zos_pragma_linkage.htm Kolusu -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IND$FILE -- where did the name come from?
Is IND the component prefix for PCOMM? So IND$FILE's name is kind of like IEBCOPY's name? Prefix + function? Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Phil Smith III Sent: Tuesday, November 27, 2018 3:33 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: IND$FILE -- where did the name come from? Anyone know how IND$FILE got its name? Just randomly wondered today. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
OS64_NOSTACK
My boss mentioned this to me regarding C/C++ code and 64-bit mode. I tried finding this in the C/C++ and LE bookshelves (zOS 2.2). No luck. I searched the net and found 1 hit. PI96691: 1-BYTE ENUM SAVED IN INCORRECT OS64_NOSTACK LINKAGE PARAMETER LIST POSITION AFTER OPTIMIZATION It's an APAR. So IBM mentions OS64_NOSTACK and so does my boss but I can't find doc on it. Can someone help me ? Thanks in advance, Pierre. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Highlighting of member names in PDS member list
> On z/OS v2.2, I see that some members in PDS and PDS-E are high-lighted. Elardus, It is documented in z/OS ISPF User's Guide Vol I. In the PDF document it is on page 134.(For V2R3) Members that have extended statistics appear highlighted in the member list when highlighting is available. The line count values displayed on the member list have a maximum value of 65535. If extended statistics are generated for a member and an extended line count value exceeds 65535, >65535 is displayed on the member list. Use the Info command from the enhanced member list to display the extended line count values. The maximum value of extended line counts is 2147483647 2.2 KC link https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.2.0/com.ibm.zos.v2r2.f54ug00/ims.htm 2.3 KC link https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.3.0/com.ibm.zos.v2r3.f54ug00/ims.htm Thanks, Kolusu -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
IND$FILE -- where did the name come from?
Anyone know how IND$FILE got its name? Just randomly wondered today. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Compute the maximum return code of all steps (so far)
I certainly don't advocate a bureaucratic rule like "put a comment on every
line", but that code really needs more comments. Variable names like P1, P2, P3
don't help either.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List on behalf of
Robert Prins
Sent: Tuesday, November 27, 2018 6:55 AM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: Compute the maximum return code of all steps (so far)
Another one, in your favourite language, originally written by Simon Brown of
Willis sometime in 1992:
*process macro langlvl(os,sprog) test(all,sym);
*process rules(laxif);
-steps: proc(param) options(main) reorder;
-dcl param char(100) var;
-
-/**
-* STEPS - Entry's, builtins & files *
-**/
-dcl (addr,
- heximage,
- index,
- length,
- plidump,
- ptradd,
- ptrvalue,
- stg,
- substr,
- unspec,
- verify) builtin;
-
-dcl sysprint file;
-
-dcl p1 ptr init (ptrvalue(16)) static;
-
-dcl 1 s1 based(p1),
- 2 p2 ptr;
-
-dcl 1 s2 based(p2),
- 2 p3 ptr;
-
-dcl 1 s3 based(p3),
- 2 *ptr,
- 2 tcb_ptr ptr;
-
-dcl 1 tcb based(tcb_ptr),
- 2 *(3) ptr,
- 2 tiot_ptr ptr,
- 2 *(41)ptr,
- 2 jscb_ptr ptr;
-
-dcl 1 tiot based(tiot_ptr),
- 2 jobname char (8),
- 2 stepname char (8);
-
-dcl 1 jscb based(jscb_ptr),
- 2 *(65)ptr,
- 2 jscbjct ptr,
- 2 *(13)ptr,
- 2 jscbssib ptr;
-
-dcl 1 jct based(jscbjct),
- 2 *(5) ptr,
- 2 *char,
- 2 jctjstat bit (8),
- 2 *char (2),
- 2 jctjname char (8),/* job name*/
- 2 *(4) ptr,
- 2 jctsdkad char (3),/* sva of first sct*/
- 2 *char,
- 2 jctjctx char (3),/* sva of jctx */
- 2 *char,
- 2 jctactad char (3),/* sva of first act*/
- 2 *char,
- 2 *(26)ptr,
- 2 *char,
- 2 jmrjmrjd fixed dec(5,3), /* job start date (julian) */
- 2 *(2) ptr,
- 2 jctuser char (7),/* job user id */
- 2 *char,
- 2 jctacode char (4);/* job abend code */
-
-dcl 1 ssib based(jscbssib),
- 2 *(3) ptr,
- 2 ssibjbid char (8);/* subsystem job id*/
-
-dcl act_ptr ptr;
-dcl 1 act based(act_ptr),
- 2 *char (24),
- 2 actprgnm char (20),
- 2 *char (3),
- 2 actjnfld char,
- 2 actaccnt char (144);
-
-dcl sct_ptr ptr;
-dcl 1 sct based(sct_ptr),
- 2 *(6) ptr,
- 2 sctsexec fixed bin (15),
- 2 *(2) char,
- 2 *(2) ptr,
- 2 sctansct char (3), /* sva of next sct*/
- 2 *char,
- 2 *(5) ptr,
- 2 sctsclpc char (8), /* name of step that called procedure */
- 2 sctsname char (8), /* step name */
- 2 *(2) ptr,
- 2 sctx_pch char (3),
- 2 *char,
- 2 *(9) ptr,
- 2 sctpgmnm char (8), /* program name */
- 2 *char (2),
- 2 sctcdent(8) char (6),
- 2 *char (6),
- 2 sctstend bit (8); /* bits and pieces */
-
-dcl sctx_ptr ptr;
-dcl 1 sctx based(sctx_ptr),
- 2 *(5) ptr,
- 2 sctxparm char (100);
-
-dcl jctx_ptr ptr;
-dcl sctxparm_v char (100) var;
-dcl have_had_current bit(1) init ('0'b);
-dcl have_had_title bit(1) init ('0'b);
-dcl max_cc fixed bin (15) init (0);
-dcl flag_after bit(1) init ('0'b); /* A */
-dcl flag_before bit(1) init ('0'b); /* B */
-dcl flag_current bit(1) init ('0'b); /* C */
-dcl flag_descbit(1) init ('0'b); /* D */
-dcl flag_flush bit(1) init ('0'b); /* F */
-dcl flag_nonzero bit(1) init ('0'b); /* N */
-dcl flag_parmbit(1) init ('0'b); /* P */
-dcl flag_zerobit(1) init ('0'b); /* Z */
-
-dcl desc_max fixed bin (31) static init (255);
-dcl desc_usedfixed bin (31) init (0);
-dcl 1 desc_array(desc_max) ctl,
- 2 stepname char (8),
- 2 text char (64) var;
-
-flag_after = (index(param, 'A') ^= 0);
-flag_before = (index(param, 'B') ^= 0);
-flag_current = (index(param, 'C') ^= 0);
-flag_desc= (index(param, 'D') ^= 0);
-flag_flush =
Re: Highlighting of member names in PDS member list
On 11/27/2018 3:09 AM, Elardus Engelbrecht wrote: Good day to all, On z/OS v2.2, I see that some members in PDS and PDS-E are high-lighted. I see (or think) this is because extended information are stored for such members. Apparently this is because bit 2 in 'Directory flag byte' are set? Ok, exactly where is that change (Directory flag byte and highlighting member names in member lists) documented? How do I explain that change(s) to my colleagues and clients? Of course I searched KC and used Google, but I got very few information from pages like this one 'ISPF libraries and data sets' in this URL https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.2.0/com.ibm.zos.v2r2.f54ug00/chap2.htm Many thanks in advance! Groete / Greetings Elardus Engelbrecht It's likely not documented. When we finally fixed extended stats in V2R3, the highlighting was left in, since it had been in ISPF for years by the time V2R3 rolled around. RCF that badboy. Regards, Tom Conley -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: So much for THAT excuse | Computerworld SHARK TANK
On Mon, 26 Nov 2018 at 14:40, Seymour J Metz wrote: > I hope not; some of gargles false hits have been absolutely ludicrous. > When it comes to search engines, I prefer Do What I Said, Not What You > Incorrectly Guessed I Meant. If you documentthat + means the term must be > present and I type a plus sign, then yes, I mean that the term must be > present. If I put a phrase in quotes, then I *DON'T* want the hits on the > individual words. > Google long ago deprecated use of + to mean that a term must be present, and instead conflated it with quotes which used to mean "exactly like this". The + was dropped because of its new use with Google Plus (Google's second major attempt to produce a FaceBook), which itself has recently been deprecated. These days it's almost impossible to get any mainstream search engine to do exactly what you want. Tony H. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SMS ALLOCATION OF VSAM DSN [EXTERNAL]
Paul, Thanks for reviewing the define cluster. I checked, there is about 7,000 cylinders on the volume. Many thanks. On Tuesday, 27 November 2018, 11:22:16 am GMT-5, Feller, Paul wrote: John, your definition should work just fine. It has been a while that I looked at HSM control files so I did a little testing. Depending on how much space you have on your HSM002 volume you could go as high as 5,800 cyls. With that size you would get a HI-A-RBA of 4262952960. Depending on how you do the calculation you would get around 3.97 gig. Just as a side note the MCDS can be an extended format dataset. Thanks.. Paul Feller AGT Mainframe Technical Support -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of John Dawes Sent: Tuesday, November 27, 2018 8:52 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: SMS ALLOCATION OF VSAM DSN [EXTERNAL] Paul, Thanks for the info. I am trying to define the HSM MCDS at a maximum number of cylinders. Below is the DEFINE CLUSTER: DEFINECLUSTER - (NAME(PROD..HSM.MCDS) VOLUME(HSM002) - CYLINDER(4300 0) - RECORDSIZE(435 2040) FREESPACE(0 0)- SPEED BUFFERSPACE(530432) - INDEXED KEYS(44 0) SHAREOPTIONS(3 3)- UNIQUE NOWRITECHECK) - DATA (NAME(PROD..HSM.MCDS.DATA) CISZ(12288) ) - INDEX (NAME(PROD..HSM.MCDS.INDEX) CISZ(2048)) I think I am safe. What says you? On Monday, 26 November 2018, 7:15:32 pm GMT-5, Feller, Paul wrote: John, basically you are limited to 4 gig (HI-A-RBA) for the size of a non-extended VSAM dataset. So depending on your VSAM define option you will get somewhere in the neighborhood of 6,000 cyls. In my quick test I got around 5,800 cyls. Thanks.. Paul Feller AGT Mainframe Technical Support -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of John Dawes Sent: Monday, November 26, 2018 12:30 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: SMS ALLOCATION OF VSAM DSN [EXTERNAL] G'Day, Could somebody please tell me what is the maximum number of cylinders that could be allocated for a SMS managed VSAM dsn (not VSAM EXTENDED ADDRESSABILITY). I have been able to allocate a dsn with 6,000 cylinders. However, due to a lack of disk space I couldn't continue with a higher allocation. Thanks. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Please note: This message originated outside your organization. Please use caution when opening links or attachments. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SMS ALLOCATION OF VSAM DSN [EXTERNAL]
John, your definition should work just fine. It has been a while that I looked at HSM control files so I did a little testing. Depending on how much space you have on your HSM002 volume you could go as high as 5,800 cyls. With that size you would get a HI-A-RBA of 4262952960. Depending on how you do the calculation you would get around 3.97 gig. Just as a side note the MCDS can be an extended format dataset. Thanks.. Paul Feller AGT Mainframe Technical Support -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of John Dawes Sent: Tuesday, November 27, 2018 8:52 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: SMS ALLOCATION OF VSAM DSN [EXTERNAL] Paul, Thanks for the info. I am trying to define the HSM MCDS at a maximum number of cylinders. Below is the DEFINE CLUSTER: DEFINECLUSTER - (NAME(PROD..HSM.MCDS) VOLUME(HSM002) - CYLINDER(4300 0) - RECORDSIZE(435 2040) FREESPACE(0 0)- SPEED BUFFERSPACE(530432) - INDEXED KEYS(44 0) SHAREOPTIONS(3 3)- UNIQUE NOWRITECHECK) - DATA (NAME(PROD..HSM.MCDS.DATA) CISZ(12288) ) - INDEX (NAME(PROD..HSM.MCDS.INDEX) CISZ(2048)) I think I am safe. What says you? On Monday, 26 November 2018, 7:15:32 pm GMT-5, Feller, Paul wrote: John, basically you are limited to 4 gig (HI-A-RBA) for the size of a non-extended VSAM dataset. So depending on your VSAM define option you will get somewhere in the neighborhood of 6,000 cyls. In my quick test I got around 5,800 cyls. Thanks.. Paul Feller AGT Mainframe Technical Support -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of John Dawes Sent: Monday, November 26, 2018 12:30 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: SMS ALLOCATION OF VSAM DSN [EXTERNAL] G'Day, Could somebody please tell me what is the maximum number of cylinders that could be allocated for a SMS managed VSAM dsn (not VSAM EXTENDED ADDRESSABILITY). I have been able to allocate a dsn with 6,000 cylinders. However, due to a lack of disk space I couldn't continue with a higher allocation. Thanks. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Please note: This message originated outside your organization. Please use caution when opening links or attachments. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SMS ALLOCATION OF VSAM DSN [EXTERNAL]
Paul, Thanks for the info. I am trying to define the HSM MCDS at a maximum number of cylinders. Below is the DEFINE CLUSTER: DEFINECLUSTER - (NAME(PROD..HSM.MCDS) VOLUME(HSM002) - CYLINDER(4300 0) - RECORDSIZE(435 2040) FREESPACE(0 0)- SPEED BUFFERSPACE(530432) - INDEXED KEYS(44 0) SHAREOPTIONS(3 3)- UNIQUE NOWRITECHECK) - DATA (NAME(PROD..HSM.MCDS.DATA) CISZ(12288) ) - INDEX (NAME(PROD..HSM.MCDS.INDEX) CISZ(2048)) I think I am safe. What says you? On Monday, 26 November 2018, 7:15:32 pm GMT-5, Feller, Paul wrote: John, basically you are limited to 4 gig (HI-A-RBA) for the size of a non-extended VSAM dataset. So depending on your VSAM define option you will get somewhere in the neighborhood of 6,000 cyls. In my quick test I got around 5,800 cyls. Thanks.. Paul Feller AGT Mainframe Technical Support -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of John Dawes Sent: Monday, November 26, 2018 12:30 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: SMS ALLOCATION OF VSAM DSN [EXTERNAL] G'Day, Could somebody please tell me what is the maximum number of cylinders that could be allocated for a SMS managed VSAM dsn (not VSAM EXTENDED ADDRESSABILITY). I have been able to allocate a dsn with 6,000 cylinders. However, due to a lack of disk space I couldn't continue with a higher allocation. Thanks. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Please note: This message originated outside your organization. Please use caution when opening links or attachments. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IRRDBU00 format
Sankaranarayanan, Vignesh wrote: >Can you please point me to a link for the format of the different record types >in IRRDBU00. >From what I see, I could find only some pictures for some parts of some record >types. From where? Please post the source of 'pictures for some parts of some record types'. You got a good and useful PDF link from Lou Lousee. Here is the KC version (this one is the TOC entry): https://www.ibm.com/support/knowledgecenter/SSLTBW_2.3.0/com.ibm.zos.v2r3.icha300/toc.htm I think you should just try out to use/navigate the KC and do your own researches. Groete / Greetings Elardus Engelbrecht -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Compute the maximum return code of all steps (so far)
Without beating a dead horse, yes that is too simple a formulation. Much of the point of copyright is protecting the author's rights in things that have been published -- made widely available. Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Bernd Oppolzer Sent: Monday, November 26, 2018 6:58 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Compute the maximum return code of all steps (so far) Sorry, this did not come to my mind, because the code appeared in a public forum ... this is the link where I found it: https://www.developpez.net/forums/d1477375/systemes/autres-systemes/z-os/jcl-sort/recuperation-code-retour-d-job-rexx/ If I find a snippet of code THAT OPEN on the internet, I normally don't care much about copyright, because IMO the original poster also didn't. But maybe that's too simple minded. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IRRDBU00 format
Chapter 9 in this book: https://www-01.ibm.com/servers/resourcelink/svc00100.nsf/pages/zOSV2R3sa232288/$file/icha300_v2r3.pdf RACF MAcros and Interfaces Lou -- Artificial Intelligence is no match for Natural Stupidity - Unknown On Tue, Nov 27, 2018 at 7:21 AM Sankaranarayanan, Vignesh < vignesh.v.sankaranaraya...@marks-and-spencer.com> wrote: > Hello List, > > Can you please point me to a link for the format of the different record > types in IRRDBU00. > From what I see, I could find only some pictures for some parts of some > record types. > > Thanks in advance. > > - Vignesh > Mainframe Infrastructure > > > MARKSANDSPENCER.COM > > Unless otherwise stated above: > Marks and Spencer plc > Registered Office: > Waterside House > 35 North Wharf Road > London > W2 1NW > > Registered No. 214436 in England and Wales. > > Telephone (020) 7935 4422 > Facsimile (020) 7487 2670 > > www.marksandspencer.com > > Please note that electronic mail may be monitored. > > This e-mail is confidential. If you received it by mistake, please let us > know and then delete it from your system; you should not copy, disclose, or > distribute its contents to anyone nor act in reliance on this e-mail, as > this is prohibited and may be unlawful. > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
IRRDBU00 format
Hello List, Can you please point me to a link for the format of the different record types in IRRDBU00. >From what I see, I could find only some pictures for some parts of some record >types. Thanks in advance. - Vignesh Mainframe Infrastructure MARKSANDSPENCER.COM Unless otherwise stated above: Marks and Spencer plc Registered Office: Waterside House 35 North Wharf Road London W2 1NW Registered No. 214436 in England and Wales. Telephone (020) 7935 4422 Facsimile (020) 7487 2670 www.marksandspencer.com Please note that electronic mail may be monitored. This e-mail is confidential. If you received it by mistake, please let us know and then delete it from your system; you should not copy, disclose, or distribute its contents to anyone nor act in reliance on this e-mail, as this is prohibited and may be unlawful. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: end-to-end visibility of mainframe performance
On Sun, 25 Nov 2018 06:47:26 -0600, Munif Sadek wrote: >Dear listers > >I am looking for MVP (minimum Viable Product) to provide End-to-End >visibility of Business Applications where back-end is Mainframe - CICS >(Inbound services via CICS Listener, Liberty, Outbound via CICS Web Services) >MQ (CICS - MQ, DB2 - MQ, FTE etc) DB2 (CICS-DB2, JDBC, ODBC etc) and of zOS. > You might want to look at Dynatrace. Does an excellent job on all front-ends and includes mainframe. >We do have various products - SAS / MXG / CMF / Mainview / NetMaster /RMF / >CICS PA / True Sight / BMC CAZe Wow, all that together… wish we had half of that. Cheers, Jantje. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Compute the maximum return code of all steps (so far)
Another one, in your favourite language, originally written by Simon Brown of
Willis sometime in 1992:
*process macro langlvl(os,sprog) test(all,sym);
*process rules(laxif);
-steps: proc(param) options(main) reorder;
-dcl param char(100) var;
-
-/**
-* STEPS - Entry's, builtins & files *
-**/
-dcl (addr,
- heximage,
- index,
- length,
- plidump,
- ptradd,
- ptrvalue,
- stg,
- substr,
- unspec,
- verify) builtin;
-
-dcl sysprint file;
-
-dcl p1 ptr init (ptrvalue(16)) static;
-
-dcl 1 s1 based(p1),
- 2 p2 ptr;
-
-dcl 1 s2 based(p2),
- 2 p3 ptr;
-
-dcl 1 s3 based(p3),
- 2 *ptr,
- 2 tcb_ptr ptr;
-
-dcl 1 tcb based(tcb_ptr),
- 2 *(3) ptr,
- 2 tiot_ptr ptr,
- 2 *(41)ptr,
- 2 jscb_ptr ptr;
-
-dcl 1 tiot based(tiot_ptr),
- 2 jobname char (8),
- 2 stepname char (8);
-
-dcl 1 jscb based(jscb_ptr),
- 2 *(65)ptr,
- 2 jscbjct ptr,
- 2 *(13)ptr,
- 2 jscbssib ptr;
-
-dcl 1 jct based(jscbjct),
- 2 *(5) ptr,
- 2 *char,
- 2 jctjstat bit (8),
- 2 *char (2),
- 2 jctjname char (8),/* job name*/
- 2 *(4) ptr,
- 2 jctsdkad char (3),/* sva of first sct*/
- 2 *char,
- 2 jctjctx char (3),/* sva of jctx */
- 2 *char,
- 2 jctactad char (3),/* sva of first act*/
- 2 *char,
- 2 *(26)ptr,
- 2 *char,
- 2 jmrjmrjd fixed dec(5,3), /* job start date (julian) */
- 2 *(2) ptr,
- 2 jctuser char (7),/* job user id */
- 2 *char,
- 2 jctacode char (4);/* job abend code */
-
-dcl 1 ssib based(jscbssib),
- 2 *(3) ptr,
- 2 ssibjbid char (8);/* subsystem job id*/
-
-dcl act_ptr ptr;
-dcl 1 act based(act_ptr),
- 2 *char (24),
- 2 actprgnm char (20),
- 2 *char (3),
- 2 actjnfld char,
- 2 actaccnt char (144);
-
-dcl sct_ptr ptr;
-dcl 1 sct based(sct_ptr),
- 2 *(6) ptr,
- 2 sctsexec fixed bin (15),
- 2 *(2) char,
- 2 *(2) ptr,
- 2 sctansct char (3), /* sva of next sct*/
- 2 *char,
- 2 *(5) ptr,
- 2 sctsclpc char (8), /* name of step that called procedure */
- 2 sctsname char (8), /* step name */
- 2 *(2) ptr,
- 2 sctx_pch char (3),
- 2 *char,
- 2 *(9) ptr,
- 2 sctpgmnm char (8), /* program name */
- 2 *char (2),
- 2 sctcdent(8) char (6),
- 2 *char (6),
- 2 sctstend bit (8); /* bits and pieces */
-
-dcl sctx_ptr ptr;
-dcl 1 sctx based(sctx_ptr),
- 2 *(5) ptr,
- 2 sctxparm char (100);
-
-dcl jctx_ptr ptr;
-dcl sctxparm_v char (100) var;
-dcl have_had_current bit(1) init ('0'b);
-dcl have_had_title bit(1) init ('0'b);
-dcl max_cc fixed bin (15) init (0);
-dcl flag_after bit(1) init ('0'b); /* A */
-dcl flag_before bit(1) init ('0'b); /* B */
-dcl flag_current bit(1) init ('0'b); /* C */
-dcl flag_descbit(1) init ('0'b); /* D */
-dcl flag_flush bit(1) init ('0'b); /* F */
-dcl flag_nonzero bit(1) init ('0'b); /* N */
-dcl flag_parmbit(1) init ('0'b); /* P */
-dcl flag_zerobit(1) init ('0'b); /* Z */
-
-dcl desc_max fixed bin (31) static init (255);
-dcl desc_usedfixed bin (31) init (0);
-dcl 1 desc_array(desc_max) ctl,
- 2 stepname char (8),
- 2 text char (64) var;
-
-flag_after = (index(param, 'A') ^= 0);
-flag_before = (index(param, 'B') ^= 0);
-flag_current = (index(param, 'C') ^= 0);
-flag_desc= (index(param, 'D') ^= 0);
-flag_flush = (index(param, 'F') ^= 0);
-flag_nonzero = (index(param, 'N') ^= 0);
-flag_parm= (index(param, 'P') ^= 0);
-flag_zero= (index(param, 'Z') ^= 0);
-
-if ^flag_after &
- ^flag_before &
- ^flag_current then
- flag_before = '1'b;
-
-if flag_desc then
- call load_desc_array();
-
-jctx_ptr = char3_to_ptr(jct.jctjctx);
-act_ptr = char3_to_ptr(jct.jctactad);
-
-put skip edit(ssib.ssibjbid,
- jct.jctjname, 'run on',
- jct.jmrjmrjd, 'by',
-
Re: TS7700 Replication status
Under the Virtual Volume tab, you can display Incoming Copy Queue. Brian On Tue, 27 Nov. 2018, 16:07 Jake Anderson, wrote: > Hi All, > > I am going through the ts7700 logon interface but I don't see any tab or > place which says about the status of TS7700 replication. > > The replication is happening over IP but is is there a way to tell the > percentage of completion like that ? > > Jake. > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Highlighting of member names in PDS member list
Good day to all, On z/OS v2.2, I see that some members in PDS and PDS-E are high-lighted. I see (or think) this is because extended information are stored for such members. Apparently this is because bit 2 in 'Directory flag byte' are set? Ok, exactly where is that change (Directory flag byte and highlighting member names in member lists) documented? How do I explain that change(s) to my colleagues and clients? Of course I searched KC and used Google, but I got very few information from pages like this one 'ISPF libraries and data sets' in this URL https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.2.0/com.ibm.zos.v2r2.f54ug00/chap2.htm Many thanks in advance! Groete / Greetings Elardus Engelbrecht -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
TS7700 Replication status
Hi All, I am going through the ts7700 logon interface but I don't see any tab or place which says about the status of TS7700 replication. The replication is happening over IP but is is there a way to tell the percentage of completion like that ? Jake. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
