Re: How determine local time zone *name* in Rexx?
East Bank Palestinians and Israelites use different times for the same location Line Islands in Kiribati uses +14 time zone, same time one day earlier as -10 Hawaii. And agree the Unix time zone database is a great idea. On Mon, May 18, 2020 at 2:58 AM Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu> wrote: > > On Mon, 18 May 2020 01:58:01 +, Mike Schwab wrote: > > >Yep. You almost need a country code, and for multi zone countries a > >zone indicator. Especially since a shared time zone might have > >different DST / ST switch dates in different countries. > > > And it's up to the recipient to unwind the process? > > That's the reason that SMTP date headers specify simply "+/-hhmm" > (Which might be + for UTC.) > > Do you want to know the physical time the message originated, > or the solar illumination at that point in spacetime? > > Otherwise, the Truth (which z/OS shuns) is: > https://www.iana.org/time-zones > > >On Sun, May 17, 2020 at 9:03 PM Paul Gilmartin > >> > > >> Beware of ambiguity. AST is both Arabia Standard Time and Atlantic > >> Standard Time, > >> https://en.wikipedia.org/wiki/List_of_time_zone_abbreviations > >> > >> ... and I hadn't gotten through the "A"s yet. > > -- gil > > -- > 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: Using the CONSOLE command
SYS1.SAMPLIB(IEATOPS0)but it better to use a token to get only the response to your command. ITschak Mugzach *|** IronSphere Platform* *|* *Information Security Continuous Monitoring for z/OS, x/Linux & IBM I **| z/VM comming son * On Mon, May 18, 2020 at 8:21 AM Gadi Ben-Avi wrote: > Hi, > I would like to write a REXX program that will issue the command to > activate the SMS Configuration, and then wait until the message saying that > the configuration has been activated is issued. > > I haven't been able to find examples that do that. > > Does anyone have an example? > > The program would run in Batch, if it makes any difference. > > Thanks > > Gadi > > > -- > 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
Using the CONSOLE command
Hi, I would like to write a REXX program that will issue the command to activate the SMS Configuration, and then wait until the message saying that the configuration has been activated is issued. I haven't been able to find examples that do that. Does anyone have an example? The program would run in Batch, if it makes any difference. Thanks Gadi -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How determine local time zone *name* in Rexx?
On Mon, 18 May 2020 01:58:01 +, Mike Schwab wrote: >Yep. You almost need a country code, and for multi zone countries a >zone indicator. Especially since a shared time zone might have >different DST / ST switch dates in different countries. > And it's up to the recipient to unwind the process? That's the reason that SMTP date headers specify simply "+/-hhmm" (Which might be + for UTC.) Do you want to know the physical time the message originated, or the solar illumination at that point in spacetime? Otherwise, the Truth (which z/OS shuns) is: https://www.iana.org/time-zones >On Sun, May 17, 2020 at 9:03 PM Paul Gilmartin >> > >> Beware of ambiguity. AST is both Arabia Standard Time and Atlantic Standard >> Time, >> https://en.wikipedia.org/wiki/List_of_time_zone_abbreviations >> >> ... and I hadn't gotten through the "A"s yet. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Looking for clarification/guidance on SMTP DD FREE/SPIN
On Fri, 15 May 2020 13:08:40 -0700, Charles Mills wrote: >I am designing a long-running Rexx program that will from time to time >generate an e-mail via the SMTP server. The idea is to allocate a DD >SYSOUT=(B,SMTP) and write the SMTP commands to it. I've never done that >before so I have some questions: > >- Am I correct in my assumption that I will have to "spin" the dataset >before the SMTP server will pick it up? >- Assuming Yes to the first question, am I correct (a.) that >FREE=CLOSE,SPIN=UNALLOC on the DD will get the records over to SMTP on >EXECIO (FINIS; but that (b.) at that point the DD "no longer exists" -- that >I will get an error if I try to open it again? (Recall the program is >"long-running" and needs to generate multiple e-mails "from time to time." >They need to go out more or less as created, not in a big batch later on.) >- Not a huge deal if so, I guess. I can use BPXWDYN to allocate my DD again >and again rather than JCL. Anyone have any better ideas? > >Thanks. Outside-the-above-box suggestions cheerfully considered. I'm pretty >much set on Rexx, e-mails, and "long-running with multiple e-mails from time >to time" but will consider other possibilities. > >Charles I have written several long running REXX Programs that periodically send emails. If you allocate a DD in your JCL with SYSOUT going to SMTP, and specify FREE=CLOSE, then your emails will be sent to SMTP when you close the DD in REXX, (EXECIO with FINIS option). You can use the same DD over and over as long as you don't FREE it. You can also dynamically allocate a file to use to send email like this: 'ALLOCATE DDNAME(yourdd) REUSE SYSOUT', 'SPIN(UNALLOC) DEST(yournode.SMTP)' (You probably don't need the Node Name, but it doesn't hurt. You might need it if the Job is submitted from a different node than the one it is running on. You can get the node name of the current system in REXX with SYSVAR: sysnode = SysVar('SYSNODE') ). Write your email to the DD Name you specified with EXECIO, then FREE it when you are done. REUSE lets you use the same DD Name over and over. -- Dale R. Smith -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How determine local time zone *name* in Rexx?
Yep. You almost need a country code, and for multi zone countries a zone indicator. Especially since a shared time zone might have different DST / ST switch dates in different countries. On Sun, May 17, 2020 at 9:03 PM Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu> wrote: > > On Sun, 17 May 2020 13:39:18 -0700, Charles Mills wrote: > > >Please read the subject line ... :-) > > > Beware of ambiguity. AST is both Arabia Standard Time and Atlantic Standard > Time, > https://en.wikipedia.org/wiki/List_of_time_zone_abbreviations > > ... and I hadn't gotten through the "A"s yet. > > -- gil > > -- > 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
ASAP Application of IBM Servicelink
I have a question or two for the group. Does anyone still use the ASAP (Automatic Software Alert Process) "application" of IBM Servicelink? My reason for asking...it appears (is) broke. The last Email I received from the ASAP application was on April 21,2020. I did not notice the "lack of Emails" from it for a couple of weeks. I have opened a feedback ticket as a Sev 2 on May 9, 2020. The last update from the support area was on May 15, 2020 and it appears to be saying that the problem is a "general issue" not specific to my IBM ID. Glenn -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How determine local time zone *name* in Rexx?
Or as I said in the OP "and yes, I know the limitations thereof, and that they are not necessarily unique, etc., etc." I think I have run into EST being both Eastern Standard and European Summer Time. It is obviously a funky system, as so many "legacy" (in the generic sense of the word, not in the sense of "mainframe") systems are. +/-nnn makes so much more sense. Frankly, if programmers ruled the world, there probably would not be any local times at all. Certainly no summer times. I would not have been processing the 'XXX' in any event, so I would not have cared about trying to interpret it. It could be literally XXX for all I cared. The e-mail header apparently wanted it and so I was going to put it in there. Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Paul Gilmartin Sent: Sunday, May 17, 2020 2:03 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: How determine local time zone *name* in Rexx? On Sun, 17 May 2020 13:39:18 -0700, Charles Mills wrote: >Please read the subject line ... :-) > Beware of ambiguity. AST is both Arabia Standard Time and Atlantic Standard Time, https://en.wikipedia.org/wiki/List_of_time_zone_abbreviations ... and I hadn't gotten through the "A"s yet. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How determine local time zone *name* in Rexx?
BPXWUNIX with date '%D %X %Z' is the method I use to get date, time, and timezone name from Rexx. https://www.ibm.com/support/knowledgecenter/SSLTBW_2.3.0/com.ibm.zos.v2r3.bpxb600/wunix.htm https://www.ibm.com/support/knowledgecenter/SSLTBW_2.3.0/com.ibm.zos.v2r3.bpxa500/date.htm On Sun, May 17, 2020 at 2:57 PM Paul Gilmartin < 000433f07816-dmarc-requ...@listserv.ua.edu> wrote: > On Sun, 17 May 2020 11:38:11 -0700, Charles Mills wrote: > > >I want to get the 3-or-so character *name* of the local time zone in Rexx. > >What is the most straightforward way? > > > From the command line, I'd use: > 869 $ date +%Z > MDT > > >Environment: Rexx running in an STC under TSO (IRXEXEC). > > > Use ADDRESS SYSCALL spawn date +%Z > or BPXWUNIX directing stdout to a stem. > Both work in all common environments. > > It depends on your sysadmin's having configured correctly. > > -- gil > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Looking for clarification/guidance on SMTP DD FREE/SPIN
I only have 6 chapters in Version 4.0.0 Edition, August 14, 2009; I take it that I have obsolete copies of the manuals? -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of scott Ford [idfli...@gmail.com] Sent: Sunday, May 17, 2020 3:55 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Looking for clarification/guidance on SMTP DD FREE/SPIN Seymour, Rxsock - TCPIP guide for OOrexx Chapter 8 specifically. Scott On Sun, May 17, 2020 at 3:34 PM Seymour J Metz wrote: > > How does one "issue" SPIN=UNALLOC? > > With a DD statement in the JCL. That's part of why I find the text > confusing. > > > What is a "spin SYSOUT data set" other than one with the SPIN keyword or > text unit? > > A spin dataset is a SYSOUT dataset that can be processed before the job > terminates. You can specify it in the JCL, in the dynamic allocation or in > the DYNAMIC unallocation. You can also spin an open SYSOUT dataset with > SETPRT. > > > Documentation semantics aside > > You can't get correct output if you set the semantics aside. > > > How do I allocate an independent track group? > > DALSPIN (X'8013') > > > -- > Shmuel (Seymour J.) Metz > http://mason.gmu.edu/~smetz3 > > > From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf > of Charles Mills [charl...@mcn.org] > Sent: Sunday, May 17, 2020 3:11 PM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: Looking for clarification/guidance on SMTP DD FREE/SPIN > > Thanks and agree on the confusing part. > > "dynamically allocate a spin SYSOUT data set ... fail to issue > SPIN=UNALLOC" > > How does one "issue" SPIN=UNALLOC? What is a "spin SYSOUT data set" other > than one with the SPIN keyword or text unit? > > Documentation semantics aside, this could be an issue for me. It is > intended > to be a long-running STC that will send small e-mails infrequently ... but > a > track here and a track there .. pretty soon you are talking real DASD. > > How do I allocate an independent track group? > > Charles > > > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Behalf Of Seymour J Metz > Sent: Sunday, May 17, 2020 11:50 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: Looking for clarification/guidance on SMTP DD FREE/SPIN > > > What options are those? > > "For applications that dynamically allocate a spin SYSOUT data set > (unallocation at Close - Key X'001C') > but fail to issue FREE=CLOSE or SPIN=UNALLOC, JES2 does not free spool > tracks allocated to the spin > data set until the job is purged. In this case, end-of-task processing > deallocates the data set and job > purge processing returns the allocated tracks." > > That text is confusing, since FREE and SPIN are keywords on the DD > statement > and X'001C' is DALFREE, but DALSPIN (X'8013') would seem to be what is > relevant for the allocation. There is a DUNSPIN ('X'8013') on unallocation > that is documented as having the same effect, but if the data set doesn't > already have an independent track group then unallocate can't change that. > I've sent an RCF. > > > -- > Shmuel (Seymour J.) Metz > http://mason.gmu.edu/~smetz3 > > > From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf > of > Charles Mills [charl...@mcn.org] > Sent: Sunday, May 17, 2020 11:19 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: Looking for clarification/guidance on SMTP DD FREE/SPIN > > > Haven't you switched to CSSMTP? What's the drop dead date on SMTP? > > Nope and I don't know. I Googled and > and got no hits. Do you know? > > > Do you want the SPOOL space release after the e-mail goes out? If you do > dynamic allocation then you need to use the right options. > > Thank you. Yes. What options are those? > > > Why put it in your JCL at all. > > That sort of knowledge was indeed one of the purposes of my query. > > Charles > > -- > 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 > -- *IDMWORKS * Scott Ford z/OS Dev. “By elevating a friend or Collegue you elevate
Re: How determine local time zone *name* in Rexx?
On Sun, 17 May 2020 13:39:18 -0700, Charles Mills wrote: >Please read the subject line ... :-) > Beware of ambiguity. AST is both Arabia Standard Time and Atlantic Standard Time, https://en.wikipedia.org/wiki/List_of_time_zone_abbreviations ... and I hadn't gotten through the "A"s yet. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Looking for clarification/guidance on SMTP DD FREE/SPIN
No. Independent track group is a special case. Spin is synonymous with "start processing now" and does not imply that the space will be reclaimed before the entire job is processed. If your DD has SPIN=CLOSE or you dynamically alloowcate with DALSPIN, then you get an independent track group whether or not you have FREE=CLOSE. If you dynamically unallocate the SYSOUT data set, then subsequent processing is the same as if you had specified FREE=CLOSE. The difference is just in programming convenience. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Charles Mills [charl...@mcn.org] Sent: Sunday, May 17, 2020 4:08 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Looking for clarification/guidance on SMTP DD FREE/SPIN So "spin" is more or less synonymous with "independent track group," at least for spin on allocation (DD or SVC99) as opposed to after allocation such as with SETPRT or on unallocation? Or re-phrasing the question, if I allocate with SPIN=UNALLOC and FREE on CLOSE, and do CLOSE the dataset, then I will not "consume" spool tracks endlessly (assuming a writer picks up the dataset and processes it). Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Seymour J Metz Sent: Sunday, May 17, 2020 12:34 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Looking for clarification/guidance on SMTP DD FREE/SPIN > How does one "issue" SPIN=UNALLOC? With a DD statement in the JCL. That's part of why I find the text confusing. > What is a "spin SYSOUT data set" other than one with the SPIN keyword or text unit? A spin dataset is a SYSOUT dataset that can be processed before the job terminates. You can specify it in the JCL, in the dynamic allocation or in the DYNAMIC unallocation. You can also spin an open SYSOUT dataset with SETPRT. > Documentation semantics aside You can't get correct output if you set the semantics aside. > How do I allocate an independent track group? DALSPIN (X'8013') -- 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: Is there any z/OS API to get byte file size for non-VSAM, non-zFS, non-database files?
The feasibility of answering this question depends a lot on whether one means - a ballpark size -- in which case tracks * 56K might suffice, and might well be available - an exact size, in which case I fear you may be SOL - an exact size ... but what does that mean? With or without LLBB's? With or without newlines? With or without UTF-8 expansion to > 8 bits? Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Paul Gilmartin Sent: Sunday, May 17, 2020 1:07 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Is there any z/OS API to get byte file size for non-VSAM, non-zFS, non-database files? On Sun, 17 May 2020 06:01:39 +, Farley, Peter x23353 wrote: >Thanks Mike. If CSI is in fact a potential solution I can pass that on. >Meantime I will try to find out if the VSAM file being sent is already >extended format or not. I have the impression from my co-worker that the >record volume isn't sufficient to warrant extended format under current >storage administration rules, but if extended format solves the requirement to >determine file size it might be an acceptable exception to the storage admin >rules. > As stated earlier, track count isn't sufficient for an exact answer except for RECFM=VBS. Worse yet, you mentioned a non-z/OS destination. The answer may be modified not only by newline insertion, but by possible need to convert from IBM-037 to UTF-8. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How determine local time zone *name* in Rexx?
Please read the subject line ... :-) Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Lionel B Dyck Sent: Sunday, May 17, 2020 1:14 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: How determine local time zone *name* in Rexx? Here is some code that was provided to XMITIP by Leland Lucius that will get you the time zone while in rexx: /* rexx */ say timezone() exit /* * = * Function: Timezone: Calculates the offset from GMT * Arguments: (none) : nothing is required * Return:offset : offset in (-)HHMM format * Exposed vars: (none) : nothing is exposed * * Note: Uses the CVTLDTO field in one of the CVT extensions. *It looks like this field was added sometime in 1991, *so this routine will not work on any OS version older *than that. * = */ Timezone: PROCEDURE /* === * We're gonna have a big number */ NUMERIC DIGITS 21 /* === * Get current CVTLDTO * (Local Date Time Offset in STCK format)) */ cvt = C2d( Storage( D2x( 16 ), 4 ) ) cvttz = C2d( Storage( D2x( cvt + 304 ), 4 ) ) cvtext2 = C2d( Storage( D2x( cvt + 328 ), 4 ) ) cvtldto = C2d( Storage( D2x( cvtext2 + 56 ), 8 ), 8 ) /* === * Calc the current offset in hours and minutes *(work with absolute) */ absldto = Abs( cvtldto ) hours = absldto % x2d("D693A40" ) minutes = ( absldto % x2d("393870") ) // 60 /* === * Correction to Round to nearest hour */ If minutes <> "00" Then Do If minutes > 30 Then hours = hours + 1 /* minutes = 00 */ End /* === * Format to ANSI standard X3.51-1975 */ zone= Right( hours, 2, "0" )Right( minutes, 2, "0" ) IF cvtldto < 0 THEN DO zone = "-"zone END ELSE DO zone = "+"zone END /* === * Reset */ NUMERIC DIGITS RETURN zone Lionel B. Dyck < Website: https://www.lbdsoftware.com "Worry more about your character than your reputation. Character is what you are, reputation merely what others think you are." - John Wooden -Original Message- From: IBM Mainframe Discussion List On Behalf Of Steve Smith Sent: Sunday, May 17, 2020 3:08 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: How determine local time zone *name* in Rexx? It's not so basic. AFAIK, z/OS doesn't keep track of the local timezone name, other than the Unix TZ environment variable, which of course is arbitrarily set by whoever sets it. But that's pretty much the nature of timezone names, which are not unique, consistent, or properly understood. If you really wanted to go down the rabbit hole, you'd have to incorporate the logic of https://www.timeanddate.com/ as well as know your latitude. A bit more than a table look up. sas On Sun, May 17, 2020 at 3:21 PM Charles Mills wrote: > The heck with it! I wanted it for the "Date:" line in an outgoing > e-mail but it appears that SMTP provides a sent timestamp if I don't, > so the heck with it! > > Thanks all for your efforts. Why should something so basic be so hard? > > Charles > > -- 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: Is there any z/OS API to get byte file size for non-VSAM, non-zFS, non-database files?
Is the non-zFS "file" of the subject a data set / data set member (since we move from HFS)? Or something else? I don't know what UDATASIZ and COMUDSIZ might or might not contain, but in general the answer to the subject question is likely "no" because z/OS likely does not keep that information. z/OS itself has no use for that information, and maybe it's the case that there is no valid use for it in an application. Knowing the byte file size (which is what was asked about) is not the same as knowing the number of records and the record size, particularly for a variable-record-length data set, or the number of cylinders and/or tracks and/or blocks that are allotted to the data set / member. Peter Relson z/OS Core Technology Design -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How determine local time zone *name* in Rexx?
On Sun, 17 May 2020 14:57:14 -0500, Paul Gilmartin wrote: >On Sun, 17 May 2020 11:38:11 -0700, Charles Mills wrote: > >>I want to get the 3-or-so character *name* of the local time zone in Rexx. >>What is the most straightforward way? >> >From the command line, I'd use: >869 $ date +%Z >MDT > An embellishment, suitable for email headers: 874 $ date "+Date: %a, %e %b %Y %T %z" Date: Sun, 17 May 2020 14:27:40 -0600 >>Environment: Rexx running in an STC under TSO (IRXEXEC). >> >Use ADDRESS SYSCALL spawn date +%Z >or BPXWUNIX directing stdout to a stem. >Both work in all common environments. > >It depends on your sysadmin's having configured correctly. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How determine local time zone *name* in Rexx?
Here is some code that was provided to XMITIP by Leland Lucius that will get you the time zone while in rexx: /* rexx */ say timezone() exit /* * = * Function: Timezone: Calculates the offset from GMT * Arguments: (none) : nothing is required * Return:offset : offset in (-)HHMM format * Exposed vars: (none) : nothing is exposed * * Note: Uses the CVTLDTO field in one of the CVT extensions. *It looks like this field was added sometime in 1991, *so this routine will not work on any OS version older *than that. * = */ Timezone: PROCEDURE /* === * We're gonna have a big number */ NUMERIC DIGITS 21 /* === * Get current CVTLDTO * (Local Date Time Offset in STCK format)) */ cvt = C2d( Storage( D2x( 16 ), 4 ) ) cvttz = C2d( Storage( D2x( cvt + 304 ), 4 ) ) cvtext2 = C2d( Storage( D2x( cvt + 328 ), 4 ) ) cvtldto = C2d( Storage( D2x( cvtext2 + 56 ), 8 ), 8 ) /* === * Calc the current offset in hours and minutes *(work with absolute) */ absldto = Abs( cvtldto ) hours = absldto % x2d("D693A40" ) minutes = ( absldto % x2d("393870") ) // 60 /* === * Correction to Round to nearest hour */ If minutes <> "00" Then Do If minutes > 30 Then hours = hours + 1 /* minutes = 00 */ End /* === * Format to ANSI standard X3.51-1975 */ zone= Right( hours, 2, "0" )Right( minutes, 2, "0" ) IF cvtldto < 0 THEN DO zone = "-"zone END ELSE DO zone = "+"zone END /* === * Reset */ NUMERIC DIGITS RETURN zone Lionel B. Dyck < Website: https://www.lbdsoftware.com "Worry more about your character than your reputation. Character is what you are, reputation merely what others think you are." - John Wooden -Original Message- From: IBM Mainframe Discussion List On Behalf Of Steve Smith Sent: Sunday, May 17, 2020 3:08 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: How determine local time zone *name* in Rexx? It's not so basic. AFAIK, z/OS doesn't keep track of the local timezone name, other than the Unix TZ environment variable, which of course is arbitrarily set by whoever sets it. But that's pretty much the nature of timezone names, which are not unique, consistent, or properly understood. If you really wanted to go down the rabbit hole, you'd have to incorporate the logic of https://www.timeanddate.com/ as well as know your latitude. A bit more than a table look up. sas On Sun, May 17, 2020 at 3:21 PM Charles Mills wrote: > The heck with it! I wanted it for the "Date:" line in an outgoing > e-mail but it appears that SMTP provides a sent timestamp if I don't, > so the heck with it! > > Thanks all for your efforts. Why should something so basic be so hard? > > Charles > > -- 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: How determine local time zone *name* in Rexx?
It's not so basic. AFAIK, z/OS doesn't keep track of the local timezone name, other than the Unix TZ environment variable, which of course is arbitrarily set by whoever sets it. But that's pretty much the nature of timezone names, which are not unique, consistent, or properly understood. If you really wanted to go down the rabbit hole, you'd have to incorporate the logic of https://www.timeanddate.com/ as well as know your latitude. A bit more than a table look up. sas On Sun, May 17, 2020 at 3:21 PM Charles Mills wrote: > The heck with it! I wanted it for the "Date:" line in an outgoing e-mail > but > it appears that SMTP provides a sent timestamp if I don't, so the heck with > it! > > Thanks all for your efforts. Why should something so basic be so hard? > > Charles > > -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Looking for clarification/guidance on SMTP DD FREE/SPIN
So "spin" is more or less synonymous with "independent track group," at least for spin on allocation (DD or SVC99) as opposed to after allocation such as with SETPRT or on unallocation? Or re-phrasing the question, if I allocate with SPIN=UNALLOC and FREE on CLOSE, and do CLOSE the dataset, then I will not "consume" spool tracks endlessly (assuming a writer picks up the dataset and processes it). Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Seymour J Metz Sent: Sunday, May 17, 2020 12:34 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Looking for clarification/guidance on SMTP DD FREE/SPIN > How does one "issue" SPIN=UNALLOC? With a DD statement in the JCL. That's part of why I find the text confusing. > What is a "spin SYSOUT data set" other than one with the SPIN keyword or text unit? A spin dataset is a SYSOUT dataset that can be processed before the job terminates. You can specify it in the JCL, in the dynamic allocation or in the DYNAMIC unallocation. You can also spin an open SYSOUT dataset with SETPRT. > Documentation semantics aside You can't get correct output if you set the semantics aside. > How do I allocate an independent track group? DALSPIN (X'8013') -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Is there any z/OS API to get byte file size for non-VSAM, non-zFS, non-database files?
On Sun, 17 May 2020 06:01:39 +, Farley, Peter x23353 wrote: >Thanks Mike. If CSI is in fact a potential solution I can pass that on. >Meantime I will try to find out if the VSAM file being sent is already >extended format or not. I have the impression from my co-worker that the >record volume isn't sufficient to warrant extended format under current >storage administration rules, but if extended format solves the requirement to >determine file size it might be an acceptable exception to the storage admin >rules. > As stated earlier, track count isn't sufficient for an exact answer except for RECFM=VBS. Worse yet, you mentioned a non-z/OS destination. The answer may be modified not only by newline insertion, but by possible need to convert from IBM-037 to UTF-8. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How determine local time zone *name* in Rexx?
On Sun, 17 May 2020 11:38:11 -0700, Charles Mills wrote: >I want to get the 3-or-so character *name* of the local time zone in Rexx. >What is the most straightforward way? > From the command line, I'd use: 869 $ date +%Z MDT >Environment: Rexx running in an STC under TSO (IRXEXEC). > Use ADDRESS SYSCALL spawn date +%Z or BPXWUNIX directing stdout to a stem. Both work in all common environments. It depends on your sysadmin's having configured correctly. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How determine local time zone *name* in Rexx?
Charles, Maybe a C or C++ function call sir? Scott On Sun, May 17, 2020 at 3:21 PM Charles Mills wrote: > The heck with it! I wanted it for the "Date:" line in an outgoing e-mail > but > it appears that SMTP provides a sent timestamp if I don't, so the heck with > it! > > Thanks all for your efforts. Why should something so basic be so hard? > > Charles > > > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Behalf Of Charles Mills > Sent: Sunday, May 17, 2020 11:38 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: How determine local time zone *name* in Rexx? > > I want to get the 3-or-so character *name* of the local time zone in Rexx. > What is the most straightforward way? > > I get lots of hits that explain how to calculate the local offset from GMT, > but what I need is the name such as 'EST' or 'PDT' (and yes, I know the > limitations thereof, and that they are not necessarily unique, etc., etc.). > I just want to get it. I would prefer not to have a table and calculate it > from the offset. > > Environment: Rexx running in an STC under TSO (IRXEXEC). > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > -- Scott Ford IDMWORKS z/OS Development -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Looking for clarification/guidance on SMTP DD FREE/SPIN
Seymour, Rxsock - TCPIP guide for OOrexx Chapter 8 specifically. Scott On Sun, May 17, 2020 at 3:34 PM Seymour J Metz wrote: > > How does one "issue" SPIN=UNALLOC? > > With a DD statement in the JCL. That's part of why I find the text > confusing. > > > What is a "spin SYSOUT data set" other than one with the SPIN keyword or > text unit? > > A spin dataset is a SYSOUT dataset that can be processed before the job > terminates. You can specify it in the JCL, in the dynamic allocation or in > the DYNAMIC unallocation. You can also spin an open SYSOUT dataset with > SETPRT. > > > Documentation semantics aside > > You can't get correct output if you set the semantics aside. > > > How do I allocate an independent track group? > > DALSPIN (X'8013') > > > -- > Shmuel (Seymour J.) Metz > http://mason.gmu.edu/~smetz3 > > > From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf > of Charles Mills [charl...@mcn.org] > Sent: Sunday, May 17, 2020 3:11 PM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: Looking for clarification/guidance on SMTP DD FREE/SPIN > > Thanks and agree on the confusing part. > > "dynamically allocate a spin SYSOUT data set ... fail to issue > SPIN=UNALLOC" > > How does one "issue" SPIN=UNALLOC? What is a "spin SYSOUT data set" other > than one with the SPIN keyword or text unit? > > Documentation semantics aside, this could be an issue for me. It is > intended > to be a long-running STC that will send small e-mails infrequently ... but > a > track here and a track there .. pretty soon you are talking real DASD. > > How do I allocate an independent track group? > > Charles > > > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Behalf Of Seymour J Metz > Sent: Sunday, May 17, 2020 11:50 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: Looking for clarification/guidance on SMTP DD FREE/SPIN > > > What options are those? > > "For applications that dynamically allocate a spin SYSOUT data set > (unallocation at Close - Key X'001C') > but fail to issue FREE=CLOSE or SPIN=UNALLOC, JES2 does not free spool > tracks allocated to the spin > data set until the job is purged. In this case, end-of-task processing > deallocates the data set and job > purge processing returns the allocated tracks." > > That text is confusing, since FREE and SPIN are keywords on the DD > statement > and X'001C' is DALFREE, but DALSPIN (X'8013') would seem to be what is > relevant for the allocation. There is a DUNSPIN ('X'8013') on unallocation > that is documented as having the same effect, but if the data set doesn't > already have an independent track group then unallocate can't change that. > I've sent an RCF. > > > -- > Shmuel (Seymour J.) Metz > http://mason.gmu.edu/~smetz3 > > > From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf > of > Charles Mills [charl...@mcn.org] > Sent: Sunday, May 17, 2020 11:19 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: Looking for clarification/guidance on SMTP DD FREE/SPIN > > > Haven't you switched to CSSMTP? What's the drop dead date on SMTP? > > Nope and I don't know. I Googled and > and got no hits. Do you know? > > > Do you want the SPOOL space release after the e-mail goes out? If you do > dynamic allocation then you need to use the right options. > > Thank you. Yes. What options are those? > > > Why put it in your JCL at all. > > That sort of knowledge was indeed one of the purposes of my query. > > Charles > > -- > 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 > -- *IDMWORKS * Scott Ford z/OS Dev. “By elevating a friend or Collegue you elevate yourself, by demeaning a friend or collegue you demean yourself” www.idmworks.com scott.f...@idmworks.com Blog: www.idmworks.com/blog *The information contained in this email message and any attachment may be privileged, confidential, proprietary or otherwise protected from disclosure. If the reader of this message is not the intended recipient, you are hereby notified that any dissemination, distribution, copying or use of this message and any attachment
Re: Looking for clarification/guidance on SMTP DD FREE/SPIN
> How does one "issue" SPIN=UNALLOC? With a DD statement in the JCL. That's part of why I find the text confusing. > What is a "spin SYSOUT data set" other than one with the SPIN keyword or text > unit? A spin dataset is a SYSOUT dataset that can be processed before the job terminates. You can specify it in the JCL, in the dynamic allocation or in the DYNAMIC unallocation. You can also spin an open SYSOUT dataset with SETPRT. > Documentation semantics aside You can't get correct output if you set the semantics aside. > How do I allocate an independent track group? DALSPIN (X'8013') -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Charles Mills [charl...@mcn.org] Sent: Sunday, May 17, 2020 3:11 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Looking for clarification/guidance on SMTP DD FREE/SPIN Thanks and agree on the confusing part. "dynamically allocate a spin SYSOUT data set ... fail to issue SPIN=UNALLOC" How does one "issue" SPIN=UNALLOC? What is a "spin SYSOUT data set" other than one with the SPIN keyword or text unit? Documentation semantics aside, this could be an issue for me. It is intended to be a long-running STC that will send small e-mails infrequently ... but a track here and a track there .. pretty soon you are talking real DASD. How do I allocate an independent track group? Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Seymour J Metz Sent: Sunday, May 17, 2020 11:50 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Looking for clarification/guidance on SMTP DD FREE/SPIN > What options are those? "For applications that dynamically allocate a spin SYSOUT data set (unallocation at Close - Key X'001C') but fail to issue FREE=CLOSE or SPIN=UNALLOC, JES2 does not free spool tracks allocated to the spin data set until the job is purged. In this case, end-of-task processing deallocates the data set and job purge processing returns the allocated tracks." That text is confusing, since FREE and SPIN are keywords on the DD statement and X'001C' is DALFREE, but DALSPIN (X'8013') would seem to be what is relevant for the allocation. There is a DUNSPIN ('X'8013') on unallocation that is documented as having the same effect, but if the data set doesn't already have an independent track group then unallocate can't change that. I've sent an RCF. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Charles Mills [charl...@mcn.org] Sent: Sunday, May 17, 2020 11:19 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Looking for clarification/guidance on SMTP DD FREE/SPIN > Haven't you switched to CSSMTP? What's the drop dead date on SMTP? Nope and I don't know. I Googled and and got no hits. Do you know? > Do you want the SPOOL space release after the e-mail goes out? If you do dynamic allocation then you need to use the right options. Thank you. Yes. What options are those? > Why put it in your JCL at all. That sort of knowledge was indeed one of the purposes of my query. Charles -- 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: How determine local time zone *name* in Rexx?
The heck with it! I wanted it for the "Date:" line in an outgoing e-mail but it appears that SMTP provides a sent timestamp if I don't, so the heck with it! Thanks all for your efforts. Why should something so basic be so hard? Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Charles Mills Sent: Sunday, May 17, 2020 11:38 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: How determine local time zone *name* in Rexx? I want to get the 3-or-so character *name* of the local time zone in Rexx. What is the most straightforward way? I get lots of hits that explain how to calculate the local offset from GMT, but what I need is the name such as 'EST' or 'PDT' (and yes, I know the limitations thereof, and that they are not necessarily unique, etc., etc.). I just want to get it. I would prefer not to have a table and calculate it from the offset. Environment: Rexx running in an STC under TSO (IRXEXEC). -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How determine local time zone *name* in Rexx?
now that you know the difference, from gmt/utc use if or select based on the difference. בתאריך יום א׳, 17 במאי 2020, 22:14, מאת Charles Mills : > Where is the *name* in the d t output? > > IEE136I LOCAL: TIME=15.11.18 DATE=2020.138 UTC: TIME=19.11.18 > DATE=2020.138 > > Charles > > > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Behalf Of ITschak Mugzach > Sent: Sunday, May 17, 2020 12:10 PM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: How determine local time zone *name* in Rexx? > > True, but you know the offset. Btw, d t command tells you the utc. Use > console command > > ITschak > > בתאריך יום א׳, 17 במאי 2020, 22:06, מאת Charles Mills : > > > That is the numeric offset, right, not the *name*? > > > > Charles > > > > > > -Original Message- > > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > > Behalf Of ITschak Mugzach > > Sent: Sunday, May 17, 2020 11:52 AM > > To: IBM-MAIN@LISTSERV.UA.EDU > > Subject: Re: How determine local time zone *name* in Rexx? > > > > the answer is at CVTTZ. use STORAGE to fetch the info. see below offer, > > etc. > > ITschak > > > > 304 (130) SIGNED 4 CVTTZ - Difference between local time and UTC > > (Coordinated Universal Time) in binary units of 1.048576 seconds. > Contains > > the same value as CVTLDTOL. CVTLDTO (which contains CVTLDTOL) has this > > difference to a finer degree of accuracy. > > > > > > ITschak Mugzach > > *|** IronSphere Platform* *|* *Information Security Continuous Monitoring > > for z/OS, x/Linux & IBM I **| z/VM comming son * > > > > > > > > > > On Sun, May 17, 2020 at 9:46 PM scott Ford wrote: > > > > > Charles, > > > > > > A thought, issue ‘D IPLINFO’ before set Outtrap on with a stem variable > > > After command set outtrap off and the do a parse of the stem ... > > > > > > Scott > > > > > > On Sun, May 17, 2020 at 2:42 PM scott Ford wrote: > > > > > > > Charles, > > > > > > > > I just looked through the TSO Rexx manual, I assumed you did, I > didn’t > > > see > > > > Timezone. Maybe a TSO function ? > > > > > > > > Scott > > > > > > > > On Sun, May 17, 2020 at 2:38 PM Charles Mills > > wrote: > > > > > > > >> I want to get the 3-or-so character *name* of the local time zone in > > > Rexx. > > > >> What is the most straightforward way? > > > >> > > > >> I get lots of hits that explain how to calculate the local offset > from > > > >> GMT, > > > >> but what I need is the name such as 'EST' or 'PDT' (and yes, I know > > the > > > >> limitations thereof, and that they are not necessarily unique, etc., > > > >> etc.). > > > >> I just want to get it. I would prefer not to have a table and > > calculate > > > it > > > >> from the offset. > > > >> > > > >> Environment: Rexx running in an STC under TSO (IRXEXEC). > > > >> > > > >> Thanks, > > > >> > > > >> Charles > > > >> > > > >> > -- > > > >> For IBM-MAIN subscribe / signoff / archive access instructions, > > > >> send email to lists...@listserv.ua.edu with the message: INFO > > IBM-MAIN > > > >> > > > > -- > > > > Scott Ford > > > > IDMWORKS > > > > z/OS Development > > > > > > > -- > > > Scott Ford > > > IDMWORKS > > > z/OS Development > > > > > > -- > > > For IBM-MAIN subscribe / signoff / archive access instructions, > > > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > > > > > > > -- > > For IBM-MAIN subscribe / signoff / archive access instructions, > > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > > > > -- > > For IBM-MAIN subscribe / signoff / archive access instructions, > > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > > > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Looking for clarification/guidance on SMTP DD FREE/SPIN
I saw several references to an SMTP class in RxSock, but couldn't find it in the manual. Do you have a link to the documentation of the oorexx SMTP class? -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of scott Ford [idfli...@gmail.com] Sent: Sunday, May 17, 2020 2:28 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Looking for clarification/guidance on SMTP DD FREE/SPIN Charles, Oorexx on Linux or USS has a built in SMTP class with examples Scott On Sun, May 17, 2020 at 2:12 PM Charles Mills wrote: > Thanks. > > Looks to be 100% or at least 98% compatible at the "send an e-mail" level > so > I don't think it matters a lot to this application. > > SMTP is already up and running and functional and CSSMTP is not, so it > makes > sense to use SMTP for now. > > The system in question is V2R1 (yes, I know) and soon to be V2R4. > > Charles > > > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Behalf Of Cieri, Anthony > Sent: Sunday, May 17, 2020 8:48 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: Looking for clarification/guidance on SMTP DD FREE/SPIN > > I believe that zOS V2R2 is the last OS that will support SMTP. > Starting with zOS V2R3, CSSMTP is required. > > > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > -- Scott Ford IDMWORKS z/OS Development -- 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: How determine local time zone *name* in Rexx?
Where is the *name* in the d t output? IEE136I LOCAL: TIME=15.11.18 DATE=2020.138 UTC: TIME=19.11.18 DATE=2020.138 Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of ITschak Mugzach Sent: Sunday, May 17, 2020 12:10 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: How determine local time zone *name* in Rexx? True, but you know the offset. Btw, d t command tells you the utc. Use console command ITschak בתאריך יום א׳, 17 במאי 2020, 22:06, מאת Charles Mills : > That is the numeric offset, right, not the *name*? > > Charles > > > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Behalf Of ITschak Mugzach > Sent: Sunday, May 17, 2020 11:52 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: How determine local time zone *name* in Rexx? > > the answer is at CVTTZ. use STORAGE to fetch the info. see below offer, > etc. > ITschak > > 304 (130) SIGNED 4 CVTTZ - Difference between local time and UTC > (Coordinated Universal Time) in binary units of 1.048576 seconds. Contains > the same value as CVTLDTOL. CVTLDTO (which contains CVTLDTOL) has this > difference to a finer degree of accuracy. > > > ITschak Mugzach > *|** IronSphere Platform* *|* *Information Security Continuous Monitoring > for z/OS, x/Linux & IBM I **| z/VM comming son * > > > > > On Sun, May 17, 2020 at 9:46 PM scott Ford wrote: > > > Charles, > > > > A thought, issue ‘D IPLINFO’ before set Outtrap on with a stem variable > > After command set outtrap off and the do a parse of the stem ... > > > > Scott > > > > On Sun, May 17, 2020 at 2:42 PM scott Ford wrote: > > > > > Charles, > > > > > > I just looked through the TSO Rexx manual, I assumed you did, I didn’t > > see > > > Timezone. Maybe a TSO function ? > > > > > > Scott > > > > > > On Sun, May 17, 2020 at 2:38 PM Charles Mills > wrote: > > > > > >> I want to get the 3-or-so character *name* of the local time zone in > > Rexx. > > >> What is the most straightforward way? > > >> > > >> I get lots of hits that explain how to calculate the local offset from > > >> GMT, > > >> but what I need is the name such as 'EST' or 'PDT' (and yes, I know > the > > >> limitations thereof, and that they are not necessarily unique, etc., > > >> etc.). > > >> I just want to get it. I would prefer not to have a table and > calculate > > it > > >> from the offset. > > >> > > >> Environment: Rexx running in an STC under TSO (IRXEXEC). > > >> > > >> Thanks, > > >> > > >> Charles > > >> > > >> -- > > >> For IBM-MAIN subscribe / signoff / archive access instructions, > > >> send email to lists...@listserv.ua.edu with the message: INFO > IBM-MAIN > > >> > > > -- > > > Scott Ford > > > IDMWORKS > > > z/OS Development > > > > > -- > > Scott Ford > > IDMWORKS > > z/OS Development > > > > -- > > For IBM-MAIN subscribe / signoff / archive access instructions, > > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > > > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Looking for clarification/guidance on SMTP DD FREE/SPIN
Thanks and agree on the confusing part. "dynamically allocate a spin SYSOUT data set ... fail to issue SPIN=UNALLOC" How does one "issue" SPIN=UNALLOC? What is a "spin SYSOUT data set" other than one with the SPIN keyword or text unit? Documentation semantics aside, this could be an issue for me. It is intended to be a long-running STC that will send small e-mails infrequently ... but a track here and a track there .. pretty soon you are talking real DASD. How do I allocate an independent track group? Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Seymour J Metz Sent: Sunday, May 17, 2020 11:50 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Looking for clarification/guidance on SMTP DD FREE/SPIN > What options are those? "For applications that dynamically allocate a spin SYSOUT data set (unallocation at Close - Key X'001C') but fail to issue FREE=CLOSE or SPIN=UNALLOC, JES2 does not free spool tracks allocated to the spin data set until the job is purged. In this case, end-of-task processing deallocates the data set and job purge processing returns the allocated tracks." That text is confusing, since FREE and SPIN are keywords on the DD statement and X'001C' is DALFREE, but DALSPIN (X'8013') would seem to be what is relevant for the allocation. There is a DUNSPIN ('X'8013') on unallocation that is documented as having the same effect, but if the data set doesn't already have an independent track group then unallocate can't change that. I've sent an RCF. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Charles Mills [charl...@mcn.org] Sent: Sunday, May 17, 2020 11:19 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Looking for clarification/guidance on SMTP DD FREE/SPIN > Haven't you switched to CSSMTP? What's the drop dead date on SMTP? Nope and I don't know. I Googled and and got no hits. Do you know? > Do you want the SPOOL space release after the e-mail goes out? If you do dynamic allocation then you need to use the right options. Thank you. Yes. What options are those? > Why put it in your JCL at all. That sort of knowledge was indeed one of the purposes of my query. Charles -- 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: How determine local time zone *name* in Rexx?
True, but you know the offset. Btw, d t command tells you the utc. Use console command ITschak בתאריך יום א׳, 17 במאי 2020, 22:06, מאת Charles Mills : > That is the numeric offset, right, not the *name*? > > Charles > > > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Behalf Of ITschak Mugzach > Sent: Sunday, May 17, 2020 11:52 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: How determine local time zone *name* in Rexx? > > the answer is at CVTTZ. use STORAGE to fetch the info. see below offer, > etc. > ITschak > > 304 (130) SIGNED 4 CVTTZ - Difference between local time and UTC > (Coordinated Universal Time) in binary units of 1.048576 seconds. Contains > the same value as CVTLDTOL. CVTLDTO (which contains CVTLDTOL) has this > difference to a finer degree of accuracy. > > > ITschak Mugzach > *|** IronSphere Platform* *|* *Information Security Continuous Monitoring > for z/OS, x/Linux & IBM I **| z/VM comming son * > > > > > On Sun, May 17, 2020 at 9:46 PM scott Ford wrote: > > > Charles, > > > > A thought, issue ‘D IPLINFO’ before set Outtrap on with a stem variable > > After command set outtrap off and the do a parse of the stem ... > > > > Scott > > > > On Sun, May 17, 2020 at 2:42 PM scott Ford wrote: > > > > > Charles, > > > > > > I just looked through the TSO Rexx manual, I assumed you did, I didn’t > > see > > > Timezone. Maybe a TSO function ? > > > > > > Scott > > > > > > On Sun, May 17, 2020 at 2:38 PM Charles Mills > wrote: > > > > > >> I want to get the 3-or-so character *name* of the local time zone in > > Rexx. > > >> What is the most straightforward way? > > >> > > >> I get lots of hits that explain how to calculate the local offset from > > >> GMT, > > >> but what I need is the name such as 'EST' or 'PDT' (and yes, I know > the > > >> limitations thereof, and that they are not necessarily unique, etc., > > >> etc.). > > >> I just want to get it. I would prefer not to have a table and > calculate > > it > > >> from the offset. > > >> > > >> Environment: Rexx running in an STC under TSO (IRXEXEC). > > >> > > >> Thanks, > > >> > > >> Charles > > >> > > >> -- > > >> For IBM-MAIN subscribe / signoff / archive access instructions, > > >> send email to lists...@listserv.ua.edu with the message: INFO > IBM-MAIN > > >> > > > -- > > > Scott Ford > > > IDMWORKS > > > z/OS Development > > > > > -- > > Scott Ford > > IDMWORKS > > z/OS Development > > > > -- > > 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: How determine local time zone *name* in Rexx?
LOL sas On Sun, May 17, 2020 at 2:52 PM ITschak Mugzach wrote: > the answer is at CVTTZ. use STORAGE to fetch the info. see below offer, > etc. > ITschak > > 304 (130) SIGNED 4 CVTTZ - Difference between local time and UTC > (Coordinated Universal Time) in binary units of 1.048576 seconds. Contains > the same value as CVTLDTOL. CVTLDTO (which contains CVTLDTOL) has this > difference to a finer degree of accuracy. > > > ITschak Mugzach > *|** IronSphere Platform* *|* *Information Security Continuous Monitoring > for z/OS, x/Linux & IBM I **| z/VM comming son * > > -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How determine local time zone *name* in Rexx?
That is the numeric offset, right, not the *name*? Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of ITschak Mugzach Sent: Sunday, May 17, 2020 11:52 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: How determine local time zone *name* in Rexx? the answer is at CVTTZ. use STORAGE to fetch the info. see below offer, etc. ITschak 304 (130) SIGNED 4 CVTTZ - Difference between local time and UTC (Coordinated Universal Time) in binary units of 1.048576 seconds. Contains the same value as CVTLDTOL. CVTLDTO (which contains CVTLDTOL) has this difference to a finer degree of accuracy. ITschak Mugzach *|** IronSphere Platform* *|* *Information Security Continuous Monitoring for z/OS, x/Linux & IBM I **| z/VM comming son * On Sun, May 17, 2020 at 9:46 PM scott Ford wrote: > Charles, > > A thought, issue ‘D IPLINFO’ before set Outtrap on with a stem variable > After command set outtrap off and the do a parse of the stem ... > > Scott > > On Sun, May 17, 2020 at 2:42 PM scott Ford wrote: > > > Charles, > > > > I just looked through the TSO Rexx manual, I assumed you did, I didn’t > see > > Timezone. Maybe a TSO function ? > > > > Scott > > > > On Sun, May 17, 2020 at 2:38 PM Charles Mills wrote: > > > >> I want to get the 3-or-so character *name* of the local time zone in > Rexx. > >> What is the most straightforward way? > >> > >> I get lots of hits that explain how to calculate the local offset from > >> GMT, > >> but what I need is the name such as 'EST' or 'PDT' (and yes, I know the > >> limitations thereof, and that they are not necessarily unique, etc., > >> etc.). > >> I just want to get it. I would prefer not to have a table and calculate > it > >> from the offset. > >> > >> Environment: Rexx running in an STC under TSO (IRXEXEC). > >> > >> Thanks, > >> > >> Charles > >> > >> -- > >> For IBM-MAIN subscribe / signoff / archive access instructions, > >> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > >> > > -- > > Scott Ford > > IDMWORKS > > z/OS Development > > > -- > Scott Ford > IDMWORKS > z/OS Development > > -- > 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: How determine local time zone *name* in Rexx?
the answer is at CVTTZ. use STORAGE to fetch the info. see below offer, etc. ITschak 304 (130) SIGNED 4 CVTTZ - Difference between local time and UTC (Coordinated Universal Time) in binary units of 1.048576 seconds. Contains the same value as CVTLDTOL. CVTLDTO (which contains CVTLDTOL) has this difference to a finer degree of accuracy. ITschak Mugzach *|** IronSphere Platform* *|* *Information Security Continuous Monitoring for z/OS, x/Linux & IBM I **| z/VM comming son * On Sun, May 17, 2020 at 9:46 PM scott Ford wrote: > Charles, > > A thought, issue ‘D IPLINFO’ before set Outtrap on with a stem variable > After command set outtrap off and the do a parse of the stem ... > > Scott > > On Sun, May 17, 2020 at 2:42 PM scott Ford wrote: > > > Charles, > > > > I just looked through the TSO Rexx manual, I assumed you did, I didn’t > see > > Timezone. Maybe a TSO function ? > > > > Scott > > > > On Sun, May 17, 2020 at 2:38 PM Charles Mills wrote: > > > >> I want to get the 3-or-so character *name* of the local time zone in > Rexx. > >> What is the most straightforward way? > >> > >> I get lots of hits that explain how to calculate the local offset from > >> GMT, > >> but what I need is the name such as 'EST' or 'PDT' (and yes, I know the > >> limitations thereof, and that they are not necessarily unique, etc., > >> etc.). > >> I just want to get it. I would prefer not to have a table and calculate > it > >> from the offset. > >> > >> Environment: Rexx running in an STC under TSO (IRXEXEC). > >> > >> Thanks, > >> > >> Charles > >> > >> -- > >> For IBM-MAIN subscribe / signoff / archive access instructions, > >> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > >> > > -- > > Scott Ford > > IDMWORKS > > z/OS Development > > > -- > Scott Ford > IDMWORKS > z/OS Development > > -- > 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: Looking for clarification/guidance on SMTP DD FREE/SPIN
> What options are those? "For applications that dynamically allocate a spin SYSOUT data set (unallocation at Close - Key X'001C') but fail to issue FREE=CLOSE or SPIN=UNALLOC, JES2 does not free spool tracks allocated to the spin data set until the job is purged. In this case, end-of-task processing deallocates the data set and job purge processing returns the allocated tracks." That text is confusing, since FREE and SPIN are keywords on the DD statement and X'001C' is DALFREE, but DALSPIN (X'8013') would seem to be what is relevant for the allocation. There is a DUNSPIN ('X'8013') on unallocation that is documented as having the same effect, but if the data set doesn't already have an independent track group then unallocate can't change that. I've sent an RCF. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Charles Mills [charl...@mcn.org] Sent: Sunday, May 17, 2020 11:19 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Looking for clarification/guidance on SMTP DD FREE/SPIN > Haven't you switched to CSSMTP? What's the drop dead date on SMTP? Nope and I don't know. I Googled and and got no hits. Do you know? > Do you want the SPOOL space release after the e-mail goes out? If you do dynamic allocation then you need to use the right options. Thank you. Yes. What options are those? > Why put it in your JCL at all. That sort of knowledge was indeed one of the purposes of my query. Charles -- 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: How determine local time zone *name* in Rexx?
Charles, A thought, issue ‘D IPLINFO’ before set Outtrap on with a stem variable After command set outtrap off and the do a parse of the stem ... Scott On Sun, May 17, 2020 at 2:42 PM scott Ford wrote: > Charles, > > I just looked through the TSO Rexx manual, I assumed you did, I didn’t see > Timezone. Maybe a TSO function ? > > Scott > > On Sun, May 17, 2020 at 2:38 PM Charles Mills wrote: > >> I want to get the 3-or-so character *name* of the local time zone in Rexx. >> What is the most straightforward way? >> >> I get lots of hits that explain how to calculate the local offset from >> GMT, >> but what I need is the name such as 'EST' or 'PDT' (and yes, I know the >> limitations thereof, and that they are not necessarily unique, etc., >> etc.). >> I just want to get it. I would prefer not to have a table and calculate it >> from the offset. >> >> Environment: Rexx running in an STC under TSO (IRXEXEC). >> >> Thanks, >> >> Charles >> >> -- >> For IBM-MAIN subscribe / signoff / archive access instructions, >> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN >> > -- > Scott Ford > IDMWORKS > z/OS Development > -- Scott Ford IDMWORKS z/OS Development -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How determine local time zone *name* in Rexx?
Charles, I just looked through the TSO Rexx manual, I assumed you did, I didn’t see Timezone. Maybe a TSO function ? Scott On Sun, May 17, 2020 at 2:38 PM Charles Mills wrote: > I want to get the 3-or-so character *name* of the local time zone in Rexx. > What is the most straightforward way? > > I get lots of hits that explain how to calculate the local offset from GMT, > but what I need is the name such as 'EST' or 'PDT' (and yes, I know the > limitations thereof, and that they are not necessarily unique, etc., etc.). > I just want to get it. I would prefer not to have a table and calculate it > from the offset. > > Environment: Rexx running in an STC under TSO (IRXEXEC). > > Thanks, > > Charles > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > -- Scott Ford IDMWORKS z/OS Development -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
How determine local time zone *name* in Rexx?
I want to get the 3-or-so character *name* of the local time zone in Rexx. What is the most straightforward way? I get lots of hits that explain how to calculate the local offset from GMT, but what I need is the name such as 'EST' or 'PDT' (and yes, I know the limitations thereof, and that they are not necessarily unique, etc., etc.). I just want to get it. I would prefer not to have a table and calculate it from the offset. Environment: Rexx running in an STC under TSO (IRXEXEC). Thanks, Charles -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Looking for clarification/guidance on SMTP DD FREE/SPIN
Charles, Oorexx on Linux or USS has a built in SMTP class with examples Scott On Sun, May 17, 2020 at 2:12 PM Charles Mills wrote: > Thanks. > > Looks to be 100% or at least 98% compatible at the "send an e-mail" level > so > I don't think it matters a lot to this application. > > SMTP is already up and running and functional and CSSMTP is not, so it > makes > sense to use SMTP for now. > > The system in question is V2R1 (yes, I know) and soon to be V2R4. > > Charles > > > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Behalf Of Cieri, Anthony > Sent: Sunday, May 17, 2020 8:48 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: Looking for clarification/guidance on SMTP DD FREE/SPIN > > I believe that zOS V2R2 is the last OS that will support SMTP. > Starting with zOS V2R3, CSSMTP is required. > > > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > -- Scott Ford IDMWORKS z/OS Development -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Looking for clarification/guidance on SMTP DD FREE/SPIN
Thanks. Looks to be 100% or at least 98% compatible at the "send an e-mail" level so I don't think it matters a lot to this application. SMTP is already up and running and functional and CSSMTP is not, so it makes sense to use SMTP for now. The system in question is V2R1 (yes, I know) and soon to be V2R4. Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Cieri, Anthony Sent: Sunday, May 17, 2020 8:48 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Looking for clarification/guidance on SMTP DD FREE/SPIN I believe that zOS V2R2 is the last OS that will support SMTP. Starting with zOS V2R3, CSSMTP is required. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Looking for clarification/guidance on SMTP DD FREE/SPIN
I believe that zOS V2R2 is the last OS that will support SMTP. Starting with zOS V2R3, CSSMTP is required. -Original Message- From: IBM Mainframe Discussion List On Behalf Of Charles Mills Sent: Sunday, May 17, 2020 11:19 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Looking for clarification/guidance on SMTP DD FREE/SPIN [[ SEI WARNING *** This email was sent from an external source. Do not open attachments or click on links from unknown or suspicious senders. *** ]] > Haven't you switched to CSSMTP? What's the drop dead date on SMTP? Nope and I don't know. I Googled and and got no hits. Do you know? > Do you want the SPOOL space release after the e-mail goes out? If you > do dynamic allocation then you need to use the right options. Thank you. Yes. What options are those? > Why put it in your JCL at all. That sort of knowledge was indeed one of the purposes of my query. Charles -- 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: Looking for clarification/guidance on SMTP DD FREE/SPIN
> Haven't you switched to CSSMTP? What's the drop dead date on SMTP? Nope and I don't know. I Googled and and got no hits. Do you know? > Do you want the SPOOL space release after the e-mail goes out? If you do dynamic allocation then you need to use the right options. Thank you. Yes. What options are those? > Why put it in your JCL at all. That sort of knowledge was indeed one of the purposes of my query. Charles -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Looking for clarification/guidance on SMTP DD FREE/SPIN
I don't think that XMITIP is a good fit for what I want to do. Thank you, Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Dana Mitchell Sent: Sunday, May 17, 2020 6:30 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Looking for clarification/guidance on SMTP DD FREE/SPIN How about utilizing Lionel's excellent XMITIP package to generate and send the emails? Dana On Fri, 15 May 2020 13:08:40 -0700, Charles Mills wrote: >I am designing a long-running Rexx program that will from time to time >generate an e-mail via the SMTP server. -- 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: DFSMS Move Dataset
If you have DFSMShsm, HSM has a simple MIGRATE DSNAME(dsname) MOVE command that will invoke SMS ACS for volume selection and move the data set (any type) to a new volume. Under the covers, HSM invokes DFSMSdss COPY w/ DELETE, w/o you having to create all of the JCL based on data set type. It can also be issued at the VOLUME and STORAGEGROUP level to drain a volume or storage group. For example, it's a simple single command that can be used to migrate from smaller volumes to newly defined larger volumes. It will even close open Db2 objects, move them and then automatically reopen. https://www.ibm.com/support/knowledgecenter/SSLTBW_2.4.0/com.ibm.zos.v2r4.arcf000/s4388.htm -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Looking for clarification/guidance on SMTP DD FREE/SPIN
Haven't you switched to CSSMTP? What's the drop dead date on SMTP? There are two spin issues: Yes, you have to spin it, and FREE will do the job. With FREE=CLOSE you don't need an explicit FREE. Do you want the SPOOL space release after the e-mail goes out? If you do dynamic allocation then you need to use the right options. Once you do a FREE the ddname is not known to your job. Why put it in your JCL at all. If you have to submit an e-mail more than once, then dynamically allocate the SYSOUT every time and use the returned ddname. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Charles Mills [charl...@mcn.org] Sent: Friday, May 15, 2020 4:08 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Looking for clarification/guidance on SMTP DD FREE/SPIN I am designing a long-running Rexx program that will from time to time generate an e-mail via the SMTP server. The idea is to allocate a DD SYSOUT=(B,SMTP) and write the SMTP commands to it. I've never done that before so I have some questions: - Am I correct in my assumption that I will have to "spin" the dataset before the SMTP server will pick it up? - Assuming Yes to the first question, am I correct (a.) that FREE=CLOSE,SPIN=UNALLOC on the DD will get the records over to SMTP on EXECIO (FINIS; but that (b.) at that point the DD "no longer exists" -- that I will get an error if I try to open it again? (Recall the program is "long-running" and needs to generate multiple e-mails "from time to time." They need to go out more or less as created, not in a big batch later on.) - Not a huge deal if so, I guess. I can use BPXWDYN to allocate my DD again and again rather than JCL. Anyone have any better ideas? Thanks. Outside-the-above-box suggestions cheerfully considered. I'm pretty much set on Rexx, e-mails, and "long-running with multiple e-mails from time to time" but will consider other possibilities. Charles -- 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: Looking for clarification/guidance on SMTP DD FREE/SPIN
How about utilizing Lionel's excellent XMITIP package to generate and send the emails? Dana On Fri, 15 May 2020 13:08:40 -0700, Charles Mills wrote: >I am designing a long-running Rexx program that will from time to time >generate an e-mail via the SMTP server. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Is there any z/OS API to get byte file size for non-VSAM, non-zFS, non-database files?
Thanks Mike. If CSI is in fact a potential solution I can pass that on. Meantime I will try to find out if the VSAM file being sent is already extended format or not. I have the impression from my co-worker that the record volume isn't sufficient to warrant extended format under current storage administration rules, but if extended format solves the requirement to determine file size it might be an acceptable exception to the storage admin rules. Please let us know if/when you get an answer. Peter -Original Message- From: IBM Mainframe Discussion List On Behalf Of Mike Hochee Sent: Saturday, May 16, 2020 11:03 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Is there any z/OS API to get byte file size for non-VSAM, non-zFS, non-database files? It does seem implausible, but who knows. It is all in the parsing and for now we can only really be sure that it means what it means. Therefore I emailed the DFSMS architect I spoke with and requested clarification. I will share when/if she responds. HTH, Mike -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Charles Mills Sent: Saturday, May 16, 2020 10:44 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Is there any z/OS API to get byte file size for non-VSAM, non-zFS, non-database files? Extended format (VSAM and non-VSAM) Or (Extended format VSAM) and (non-VSAM) ? The former is redundant or overly wordy: why not just say "extended format datasets"? The latter, OTOH, seems implausible to me. Why would they do all non-VSAM but only extended format VSAM? Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Seymour J Metz Sent: Saturday, May 16, 2020 6:40 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Is there any z/OS API to get byte file size for non-VSAM, non-zFS, non-database files? How do you parse "Restriction: This field is only valid for extended format VSAM and non-VSAM data sets."? Does that mean extended format VSAM and any format non-VSAM, or extended format VSAM extended format non-VSAM? From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Mike Hochee [mike.hoc...@aspg.com] Sent: Saturday, May 16, 2020 1:31 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Is there any z/OS API to get byte file size for non-VSAM, non-zFS, non-database files? Hi Peter, I came across a similar use case a couple times over the past year or so. Shifting priorities have prevented me from doing much with it, but while at the most recent SHARE in Fort Worth, I asked one of the DFSMS architects about it. She encouraged me to check out the CSI, specifically, fields UDATASIZ and COMUDSIZ. They appeared to satisfy my use case, although as others have mentioned there are a few restrictions especially for UDATASIZ. HTH, Mike -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Farley, Peter x23353 Sent: Thursday, May 14, 2020 11:55 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Is there any z/OS API to get byte file size for non-VSAM, non-zFS, non-database files? Caution! This message was sent from outside your organization. This question came to me from a co-worker: Is there any API to get the byte file size of a non-VSAM, non-zFS, non-database file in z/OS? I.E., byte file size for plain sequential files? I am aware of the "old way" of reading the VTOC of a volume to get the various DSCB's that total up disk extents, but that gets complicated quickly for multi-volume files, and was never guaranteed to be accurate as to the actual byte count of data in the file except in the RECFM=FS/FBS case anyway. There is always the performance-killing option of just reading the whole file and totaling up the length of every record (or block depending on how you structure the reads), but no one would call that an API. As far as I know there is no such API in z/OS, and this is what I told my co-worker, but am I wrong? Is there an alternative of which I am not aware? TIA for your input. 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...@listserv.ua.edu with the message: INFO IBM-MAIN