Re: JES2 NOTIFY EMAIL=
Thank you Tom. I don’t know the answer to that. On Wed, Nov 1, 2023 at 13:46 Tom Marchant < 000a2a8c2020-dmarc-requ...@listserv.ua.edu> wrote: > JES2 Initialization and Tuning Guide > > https://www.ibm.com/docs/en/zos/2.5.0?topic=guide-jes2-email-delivery-services-eds > > Why is it so difficult to find the manual? > > -- > Tom Marchant > > On Wed, 1 Nov 2023 13:22:51 -0700, Donald Russell > wrote: > > >New in zOS 2.3 is the NOTIFY statement. > >//label NOTIFY EMAIL= > > > >I code that in my job but never get an email. > > > >I assume something has to be configured to tell JES where the email server > >is, but our sysprog has “scoured the manuals and can’t find anything”. > > > >Any clues? > > -- > 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
JES2 NOTIFY EMAIL=
New in zOS 2.3 is the NOTIFY statement. //label NOTIFY EMAIL= I code that in my job but never get an email. I assume something has to be configured to tell JES where the email server is, but our sysprog has “scoured the manuals and can’t find anything”. Any clues? Thank you, Don -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Password Resets
I implemented a web page on VM that uses a corporate single sign on and one-time password server that acts as a proxy. If you come to my password reset page the wrong way, it redirects the browser to the SSO page. Once authenticated that proxy adds some useful headers to the https request. When my page finally gets the request it sees the info added by the proxy and puts up a page listing all userids owned by that person and let’s them provide a new password for one or any/all of them in one shot. It also unlocks various “terminal lockout” conditions. The web server id that handles that uses a Diag A0 subcode 60 (vmsecure) to effect the change. It is also configured to allow the change without the current password. That allows people to reset forgotten passwords or set an initial password for newly created userids. One caveat…. We have a global workforce and sometimes the ascii/ebcdic translation is different than their terminal emulator. That results in setting the password fine for web access things but failing for 3270 emulation things. I haven’t taken the time to sort that out yet. It’s a minor issue. Don On Tue, Aug 16, 2022 at 14:34 Steely.Mark wrote: > Does your site use a Self Help Password Reset Tool for RACF or TSS ? > > We would like the customer to be able to perform this function without > involving the Help Desk. > > Any suggestions ? > > Thank You > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: The Great Resignation
Bernie Madoff was a fiduciary. Laws don’t make people ethical. On Sat, Dec 18, 2021 at 15:49 Bill Johnson < 0047540adefe-dmarc-requ...@listserv.ua.edu> wrote: > Always go with an financial advisor who is a fiduciary. They are obligated > by law to do what’s best for you the investor. > > > Sent from Yahoo Mail for iPhone > > > On Saturday, December 18, 2021, 6:44 PM, Ed Jaffe < > edja...@phoenixsoftware.com> wrote: > > On 12/18/2021 2:04 PM, Bob Bridges wrote: > > Later it says "Nearly 70% of the 5 million people who left the labor > force during the pandemic are older than 55, according to researchers from > Goldman Sachs, and many of them aren't looking to return." I don't know > how 90% was knocked down to 70%. But anyway, it's another datum that > tempts me to reëvaluate. > > A lot of folks who thought they could retire comfortably are nervous now > that inflation is surging. You need a strategy. > > IMHO, your best option is to get advice from a legitimate > CPA/Retirement-Planner. (Someone independent that you pay directly > instead of someone who gets commissions from your investments.) > > You should not be looking for retirement/investment advice here on > IBM-MAIN. > > > -- > Phoenix Software International > Edward E. Jaffe > 831 Parkview Drive North > El Segundo, CA 90245 > https://www.phoenixsoftware.com/ > > > > > This e-mail message, including any attachments, appended messages and the > information contained therein, is for the sole use of the intended > recipient(s). If you are not an intended recipient or have otherwise > received this email message in error, any use, dissemination, distribution, > review, storage or copying of this e-mail message and the information > contained therein is strictly prohibited. If you are not an intended > recipient, please contact the sender by reply e-mail and destroy all copies > of this email message and do not otherwise utilize or retain this email > message or any or all of the information contained therein. Although this > email message and any attachments or appended messages are believed to be > free of any virus or other defect that might affect any computer system > into > which it is received and opened, it is the responsibility of the recipient > to ensure that it is virus free and no responsibility is accepted by the > sender for any loss or damage arising in any way from its opening or use. > > -- > 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
JES “end of response” marker
I can issue some JES commands through RSCS from a VM system. Is there a way to tell JES (zOS 2.4) to send a “end of response” message? Example: I can query RSCS and know when the end of the asynchronous response is. CP SMSG RSCS (MT.) QUERY LINKS the (..) modifier tells RSCS to format the responses differently allowing an automated process to know when the response is complete instead of waiting an arbitrary amount of time and guessing. CP SMSG RSCS CMD MVS $DJ1-*,JM=MINE* JES dutifully replies, a line at a time but short of seeing no more text arriving there’s no way to know the response is complete. That command may take a few seconds to run, and an automated process may incorrectly say “no response”. Sure, increase the time out, but then it waits unnecessarily long at the end to see if anything else is arriving. Cheers, Don -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Using bpxbatch to compress an MVS dataset
Thank you all for the suggestions on compressing my data. I’ve got a lot of reading/following up to do. :-) Cheers, Don On Sun, Jun 30, 2019 at 12:51 David Mingee wrote: > Hello, You can consider adding the command MODE C before the PUT > command in your FTP. This will compress the file during transmit only. > > -Original Message- > From: IBM Mainframe Discussion List On Behalf > Of Donald Russell > Sent: Sunday, June 30, 2019 3:21 PM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: Using bpxbatch to compress an MVS dataset > > I sincerely appreciate people’s feedback on this subject but the problem > I’m trying to solve is how to compress the file, not whether compression is > needed. The decision to compress was made based on frequency of use, > bandwidth between source and destination and difference in file > size/transmission time, the value of that benefit etc. > > Currently I use pkzip to create a gzip file. If I can accomplish this with > bpxbatch then I may be able to cancel the pkzip license. The other aspect > is I’d like to run this on an mvs system that doesn’t have non-ibm products > on it so bpxbatch may be available whereas pkzip is not. > > Don > > > > On Sun, Jun 30, 2019 at 10:51 Thomas Kern < > 0041d919e708-dmarc-requ...@listserv.ua.edu> wrote: > > > Another consideration is how many times the compressed file would be > > transferred. We used to host lots of documents on our mainframe to be > > served out on a website. When the transfer load became noticeable on > > the performance reports, we started compressing the most common > documents. > > The transfer load dropped dramatically and Management decided to > > compress all documents before loading them into the website. > > > > > > /Tom Kern > > > > On 06/30/2019 12:45, Donald Russell wrote: > > > I???m not considering the cost of compression in relation to the > > transfer > > > savings because the size of the files is huge (several million lines > > > of > > > text) that compress really well. Pkzip/gzip seems to get well over > > > 80% compression. Then yes, after the mvs job step runs, the ftp > > > target is in another city or even continent, and the ftp traffic is > > > encrypted inflight using ftps. > > > > > > My goal is to to compress the text file prior to ftp. > > > > > > Can bpxbatch programs like tar read/write from/to dd names, or fully > > > qualified dataset names instead of Unix-like file paths? > > > > > > Don > > > > > > > > > On Sun, Jun 30, 2019 at 09:19 Steve Thompson > wrote: > > > > > >> If this file is being sent inside your firewall, the time and CPU > > >> cycles will cost more than the ftp. This is based on experiences > > >> using MFT products. (Basically what Gadi said). > > >> > > >> We found in testing that compressing was really only useful with > > >> small pipes. Of course, there is a ratio between number of bytes to > > >> transfer > > and > > >> bandwidth in determining the effectiveness of the compression (and > > >> compression method). > > >> > > >> Now, if this is confidential data, and is going outside of your > > firewall, > > >> you have to consider encryption. Compress first, then encrypt, > > >> because encrypted data is generally uncompressable. > > >> > > >> HTH > > >> Steve Thompson > > >> > > >> Sent from my iPhone ??? small keyboarf, fat fungrs, stupd spell > manglr. > > >> Expct mistaks > > >> > > >> > > >>> On Jun 30, 2019, at 12:05 PM, Gadi Ben-Avi wrote: > > >>> > > >>> If both systems are on the same physical computer, it might not be > > worth > > >> it. > > >>> The time and cpu cycles it would take to compress and uncompress > > >>> might > > >> take longer than transferring the un compressed file. > > >>> > > >>> > > >>> -Original Message- > > >>> From: IBM Mainframe Discussion List On > > >> Behalf Of Donald Russell > > >>> Sent: Sunday, June 30, 2019 6:58 PM > > >>> To: IBM-MAIN@LISTSERV.UA.EDU > > >>> Subject: Using bpxbatch to compress an MVS dataset > > >>> > > >>> I have a batch process in zOS 2.1 (soon to be 2.3) that creates a > > >>> large > > >> text file I want to FTP t
Re: Using bpxbatch to compress an MVS dataset
I sincerely appreciate people’s feedback on this subject but the problem I’m trying to solve is how to compress the file, not whether compression is needed. The decision to compress was made based on frequency of use, bandwidth between source and destination and difference in file size/transmission time, the value of that benefit etc. Currently I use pkzip to create a gzip file. If I can accomplish this with bpxbatch then I may be able to cancel the pkzip license. The other aspect is I’d like to run this on an mvs system that doesn’t have non-ibm products on it so bpxbatch may be available whereas pkzip is not. Don On Sun, Jun 30, 2019 at 10:51 Thomas Kern < 0041d919e708-dmarc-requ...@listserv.ua.edu> wrote: > Another consideration is how many times the compressed file would be > transferred. We used to host lots of documents on our mainframe to be > served out on a website. When the transfer load became noticeable on the > performance reports, we started compressing the most common documents. > The transfer load dropped dramatically and Management decided to > compress all documents before loading them into the website. > > > /Tom Kern > > On 06/30/2019 12:45, Donald Russell wrote: > > I???m not considering the cost of compression in relation to the > transfer > > savings because the size of the files is huge (several million lines of > > text) that compress really well. Pkzip/gzip seems to get well over 80% > > compression. Then yes, after the mvs job step runs, the ftp target is in > > another city or even continent, and the ftp traffic is encrypted inflight > > using ftps. > > > > My goal is to to compress the text file prior to ftp. > > > > Can bpxbatch programs like tar read/write from/to dd names, or fully > > qualified dataset names instead of Unix-like file paths? > > > > Don > > > > > > On Sun, Jun 30, 2019 at 09:19 Steve Thompson wrote: > > > >> If this file is being sent inside your firewall, the time and CPU cycles > >> will cost more than the ftp. This is based on experiences using MFT > >> products. (Basically what Gadi said). > >> > >> We found in testing that compressing was really only useful with small > >> pipes. Of course, there is a ratio between number of bytes to transfer > and > >> bandwidth in determining the effectiveness of the compression (and > >> compression method). > >> > >> Now, if this is confidential data, and is going outside of your > firewall, > >> you have to consider encryption. Compress first, then encrypt, because > >> encrypted data is generally uncompressable. > >> > >> HTH > >> Steve Thompson > >> > >> Sent from my iPhone ??? small keyboarf, fat fungrs, stupd spell manglr. > >> Expct mistaks > >> > >> > >>> On Jun 30, 2019, at 12:05 PM, Gadi Ben-Avi wrote: > >>> > >>> If both systems are on the same physical computer, it might not be > worth > >> it. > >>> The time and cpu cycles it would take to compress and uncompress might > >> take longer than transferring the un compressed file. > >>> > >>> > >>> -Original Message- > >>> From: IBM Mainframe Discussion List On > >> Behalf Of Donald Russell > >>> Sent: Sunday, June 30, 2019 6:58 PM > >>> To: IBM-MAIN@LISTSERV.UA.EDU > >>> Subject: Using bpxbatch to compress an MVS dataset > >>> > >>> I have a batch process in zOS 2.1 (soon to be 2.3) that creates a large > >> text file I want to FTP to a zLinux system. > >>> How can I use bpxbatch tar or compress (or ?) to create a smaller file > I > >> can ftp instead instead of the original file? I don???t want to use > pkzip > >> unless that???s the only choice. Terse is no good because Linux can???t > unterse > >> it. > >>> Is there a way to specify a DD name for the input and output files, > >> similar to how FTP allows put/get //DD: > >>> Part two... the text in the file is EBCDIC, but Linux wants ASCII. I > >> don???t see an option to do the conversion. > >>> I???ll have to check tr, but maybe there???s a way to use more > traditional > >> Unix syntax like > >>> cat //dd:in | tr ... | tar -cv //dd:out > >>> > >>> Cheers, > >>> Don > >>> > >>> -- > >>> For IBM-MAIN subscribe / signoff / archive access instructions, send > >> e
Re: Using bpxbatch to compress an MVS dataset
I’m not considering the cost of compression in relation to the transfer savings because the size of the files is huge (several million lines of text) that compress really well. Pkzip/gzip seems to get well over 80% compression. Then yes, after the mvs job step runs, the ftp target is in another city or even continent, and the ftp traffic is encrypted inflight using ftps. My goal is to to compress the text file prior to ftp. Can bpxbatch programs like tar read/write from/to dd names, or fully qualified dataset names instead of Unix-like file paths? Don On Sun, Jun 30, 2019 at 09:19 Steve Thompson wrote: > If this file is being sent inside your firewall, the time and CPU cycles > will cost more than the ftp. This is based on experiences using MFT > products. (Basically what Gadi said). > > We found in testing that compressing was really only useful with small > pipes. Of course, there is a ratio between number of bytes to transfer and > bandwidth in determining the effectiveness of the compression (and > compression method). > > Now, if this is confidential data, and is going outside of your firewall, > you have to consider encryption. Compress first, then encrypt, because > encrypted data is generally uncompressable. > > HTH > Steve Thompson > > Sent from my iPhone — small keyboarf, fat fungrs, stupd spell manglr. > Expct mistaks > > > > On Jun 30, 2019, at 12:05 PM, Gadi Ben-Avi wrote: > > > > If both systems are on the same physical computer, it might not be worth > it. > > The time and cpu cycles it would take to compress and uncompress might > take longer than transferring the un compressed file. > > > > > > > > -Original Message- > > From: IBM Mainframe Discussion List On > Behalf Of Donald Russell > > Sent: Sunday, June 30, 2019 6:58 PM > > To: IBM-MAIN@LISTSERV.UA.EDU > > Subject: Using bpxbatch to compress an MVS dataset > > > > I have a batch process in zOS 2.1 (soon to be 2.3) that creates a large > text file I want to FTP to a zLinux system. > > > > How can I use bpxbatch tar or compress (or ?) to create a smaller file I > can ftp instead instead of the original file? I don’t want to use pkzip > unless that’s the only choice. Terse is no good because Linux can’t unterse > it. > > > > Is there a way to specify a DD name for the input and output files, > similar to how FTP allows put/get //DD: > > > > Part two... the text in the file is EBCDIC, but Linux wants ASCII. I > don’t see an option to do the conversion. > > > > I’ll have to check tr, but maybe there’s a way to use more traditional > Unix syntax like > > > > cat //dd:in | tr ... | tar -cv //dd:out > > > > Cheers, > > Don > > > > -- > > 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
Using bpxbatch to compress an MVS dataset
I have a batch process in zOS 2.1 (soon to be 2.3) that creates a large text file I want to FTP to a zLinux system. How can I use bpxbatch tar or compress (or ?) to create a smaller file I can ftp instead instead of the original file? I don’t want to use pkzip unless that’s the only choice. Terse is no good because Linux can’t unterse it. Is there a way to specify a DD name for the input and output files, similar to how FTP allows put/get //DD: Part two... the text in the file is EBCDIC, but Linux wants ASCII. I don’t see an option to do the conversion. I’ll have to check tr, but maybe there’s a way to use more traditional Unix syntax like cat //dd:in | tr ... | tar -cv //dd:out Cheers, Don -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
zOS 2.1 JCL Symbol Services
I wrote a small assembler program to try the JCL Symbol Services macro (IEFSJSYM) but am not having any success at getting any symbol values returned to my program. R15 is zero after the macro, and the eye-catcher is correct in the output area, but sydEntryCount is always zero. I have a very simple test case with // EXPORT SYMLIST=* //SET VAR1=200 //SET VAR='Hello World' // EXEC ASMACLG,... larl r2,symbolList lar3,symbolArea lar4,diagData iefsjsym request=getbyname,diagdata=(r4), + symlistarray=(r2),numentries==y(symbolList#), + symbarea=(r3),symbarealen==a(l'symbolArea), + mf=(e,iefsjsym_l,complete) I use GETBYNAME, but have not tried the GETALL.I also tried wildcard names in my symbol list. If I can get GETBYNAME working the way I want, I plan to use that to pass run-time options to the program instead of parsing a PARM=/PARMDD string. Thanks for any suggestions... Donald Russell -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: zOS 2.1 JCL Symbol Services
Aye chihuahua, I just found the problem as I pasted the symbol list into this email. :-) Thank you. My symbol table was coded with DS instead of DC statements, so the symbols I THOUGHT were being looked for were who-knows-what. There are no assembler warnings/errors... The source file begins with *process compat(macrocase),rent,noxref amode 31/rmode any sysstate ascenv=p, primary address space+ amode64=no,We're not 64 bit + archlvl=zarchitecture symbolList ds 0h align for larl ds cl(l'sydesymname)'VAR1' == OOPS! ds cl(l'sydesymname)'VAR2' == OOPS! symbolList# equ (*-symbolList)/l'sydesymname The output areas are in getmain'd storage, : * Allocate space for the JCL symbols I extract: * Space for a header and each extracted symbol symbolArea_ ds 0d ds (sydhdr_len)x mapped by sydhdr ds (symbolList#)xl(sydentry_len) mapped by sydentry ds (symbolList#)xl255space for value of each symbol symbolArea equ symbolArea_,*-symbolArea_ diagDatads xl16 provided by iefsjsym On Tue, Dec 30, 2014 at 9:30 AM, Elardus Engelbrecht elardus.engelbre...@sita.co.za wrote: Donald Russell wrote: I wrote a small assembler program to try the JCL Symbol Services macro (IEFSJSYM) but am not having any success at getting any symbol values returned to my program. R15 is zero after the macro, and the eye-catcher is correct in the output area, but sydEntryCount is always zero. I have a very simple test case with // EXPORT SYMLIST=* //SET VAR1=200 //SET VAR='Hello World' // EXEC ASMACLG,... larl r2,symbolList lar3,symbolArea lar4,diagData iefsjsym request=getbyname,diagdata=(r4), + symlistarray=(r2),numentries==y(symbolList#), + symbarea=(r3),symbarealen==a(l'symbolArea), + mf=(e,iefsjsym_l,complete) I see nothing strange in this macro, but ... how is the program assembled? AMODE, RMODE, RENT, etc? Do you see any assembler messages? Please post the symbolList, symbolArea, diagData definitions. Please post the areas where the macros results are placed (output area) and the results + eyecatcher as passed. 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 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Convert TOD to calendar date/time
Thanks for all the great suggestions. I used stckconv, but I'll check out these other methods too. Cheers Donald Russell On Wednesday, October 1, 2014, Peter Relson rel...@us.ibm.com wrote: Also, the BLSUXTOD (8-byte STCK input) and BLSUETOD (16-byte STCKE input) services. Peter Relson z/OS Core Technology Design -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu javascript:; with the message: INFO IBM-MAIN -- Sent from iPhone Gmail Mobile -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Convert TOD to calendar date/time
I have zOS 2.1 and am looking for an assembler macro or some other utility I can call (load/delete or via cvt etc) to convert an 8-byte TOD clock value into a character string like -mm-dd hh:mm:ss.uu That actual date format doesn't matter too much, I'm more interested in the time portion and sub-second precision. Is there anything like that already available, or do I need to write my own? Thank you, Donald Russell -- Sent from iPhone Gmail Mobile -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Convert TOD to calendar date/time
Thanks so much.. .that's exactly what I need :-) On Tue, Sep 30, 2014 at 4:32 PM, John McKown john.archie.mck...@gmail.com wrote: Yeah, got them reversed again. On Sep 30, 2014 6:27 PM, Paul Gilmartin 000433f07816-dmarc-requ...@listserv.ua.edu wrote: On 2014-09-30 17:21, John McKown wrote: CONVTOD macro ITYM STCKCONV. On Sep 30, 2014 5:41 PM, Donald Russell wrote: I have zOS 2.1 and am looking for an assembler macro or some other utility I can call (load/delete or via cvt etc) to convert an 8-byte TOD clock value into a character string like -mm-dd hh:mm:ss.uu -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: building text messages with substitutions
Sorry, I forgot to add a subject line :-( On Thu, Mar 13, 2014 at 8:04 AM, Donald Russell russell@gmail.comwrote: zOS 1.2 (upgrading to 2.1 in the next few months) I've been using WTO ROUTCDE=11 to display various message in the job log of assembler language batch applications that's great/easy for fixed text messages. VM/CMS has the APPLMSG macro which makes it ridiculously simple to build in storage, or display messages with various types of substitutions... I would like to display a message like: Records read: Items found: Hit rate: zzz% Where the value for x,y and z come from registers or fields. Of course I can do it myself with CVD/EDMK etc, but this seems like such a common sort of thing, I hoping there's a macro to do that stuff for me. Even if the macro builds the message in storage, then I can use WTO ROUTCDE=11 pointing to the text result. Thanks for any suggestions. Donald Russell -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: building text messages with substitutions
Holly Smokes! Metal C looks perfect THANKS! :-) I just need sprintf features Donald Russell On Thu, Mar 13, 2014 at 11:32 AM, Tony Harminc t...@harminc.net wrote: On 13 March 2014 14:01, John McKown john.archie.mck...@gmail.com wrote: Wish I had thought of using the Metal C version of sprintf(). I actually ended up figuring out how to write a number of z/OS UNIX commands using LE enabled assembler so that I could use things such as sprintf() or snprintf(). Well Metal C hasn't been around for all that long. There is also System Programming C, which has a different set of requirements for its subset C library that are still easier to meet than the full LE ones. Tony H. -- 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: building text messages with substitutions
I've been looking for doc on how to do this It seems I need to call __cinit to set up a C environment, then I can call sprintf and finally __cterm to terminate the C environment Sounds simple enough but I can't find what the parameter list looks like for those calls... Do I actually LOAD/DELETE those module names? I thought module names had to start with letter or national only. I don't want to write the whole thing in C, and use the occasional assembler macro, I have an assembler program and want to use sprintf to create a string of text with various substitutions in it. Once I have it all done I'm happy to share what I did... Cheers On Thursday, March 13, 2014, Tony Harminc t...@harminc.net wrote: On 13 March 2014 14:53, Donald Russell russell@gmail.comjavascript:; wrote: Holly Smokes! Metal C looks perfect THANKS! :-) I just need sprintf features Please keep us posted with your results. I haven't actually tried it, but I've thought about it a few times - enough to look at the calling and environment conventions. They look pretty easy to meet, but stack space requirements are large in comparison to typical assembler programs. If you're calling only sprintf you could presumably reuse or otherwise share the stack, i.e. what you pass to the function wouldn't have to be an actual stack that your program linkage conventions use. Tony H. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu javascript:; with the message: INFO IBM-MAIN -- Sent from iPhone Gmail Mobile -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: where to get current module name and scanning tiot
Thanks so much for pointing me to CSVQUERY Could it be any easier than that to get what I needed? :-) As for using IC/ICM... I opted to test the length at the top of my loop, then just point to the next one at the bottom of the loop. I prefer exiting the loop from one place, at the expense of an unnecessary Add-Register unconditional Branch-Relative. Re ICM vs IC ... Is it possible for the TIOT to have no entries? I'm not seeing the advantage of ICM over IC, because at that point the code knows the length is not zero, so what's the point of setting the condition code? Adding the length at the bottom of the loop points to the next (possible) item... then at the top of the loop the CLI checks if there is an item. Donald Russell On Fri, Mar 7, 2014 at 12:10 PM, Shmuel Metz (Seymour J.) shmuel+ibm-m...@patriot.net wrote: In cacdkjfqw0_gvm_oswhtacjfmgddvwdzxuxzjisqtpkjmf72...@mail.gmail.com, on 03/06/2014 at 08:18 PM, Donald Russell russell@gmail.com said: I'm writing some assembler code and need to get the name of the currently running load module, but where is that? What do you mean by currently running? If someone did a LOAD and called you at the retruned entry point, is it the caller or the callee that is currently running? After you have answered that, use CSVQUERY. Am I reading the tiot macro correctly? There's a 1 byte length of each entry, and the tiot is as large as needed for all DD names in the job step? Yes; there is a limit on the permitted size. (I thought it was a fixed size, and then had some sort of extension block as needed, No; don't confuse TIOT with XTIOT. So, would this be correct? Yes, although I would use an ICM to test in order to get rid of the IC unless the intervening code altered -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: where to get current module name and scanning tiot
Thanks so much for pointing me to CSVQUERY Could it be any easier than that to get what I needed? :-) As for using IC/ICM... I opted to test the length at the top of my loop, then just point to the next one at the bottom of the loop. I prefer exiting the loop from one place, at the expense of an unnecessary Add-Register unconditional Branch-Relative. Is it possible for the TIOT to have no entries? If I knew the TIOT could never be empty, I'd change the code to test the length only at the bottom as you suggest ... using psa,0 lr2,psatold using tcb,r2 lr2,tcbtio using tiot1,r2 tiotLoop ds 0h process tiot entry sr rx,rx (if the register is changed in the loop) icm rx,b'0001',tioelngh get offset to next tiot, set cc la r2,0(rx,r2) point to next possible entry (no cc change) jnz tiotLoop go if there is another entry Thanks again. :-) Donald Russell On Fri, Mar 7, 2014 at 12:10 PM, Shmuel Metz (Seymour J.) shmuel+ibm-m...@patriot.net wrote: In cacdkjfqw0_gvm_oswhtacjfmgddvwdzxuxzjisqtpkjmf72...@mail.gmail.com, on 03/06/2014 at 08:18 PM, Donald Russell russell@gmail.com said: I'm writing some assembler code and need to get the name of the currently running load module, but where is that? What do you mean by currently running? If someone did a LOAD and called you at the retruned entry point, is it the caller or the callee that is currently running? After you have answered that, use CSVQUERY. Am I reading the tiot macro correctly? There's a 1 byte length of each entry, and the tiot is as large as needed for all DD names in the job step? Yes; there is a limit on the permitted size. (I thought it was a fixed size, and then had some sort of extension block as needed, No; don't confuse TIOT with XTIOT. So, would this be correct? Yes, although I would use an ICM to test in order to get rid of the IC unless the intervening code altered R1. -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see http://patriot.net/~shmuel/resume/brief.html We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@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: where to get current module name and scanning tiot
On Fri, Mar 7, 2014 at 3:22 AM, Bernd Oppolzer bernd.oppol...@t-online.dewrote: For your TIOT loop, I think it is correct, although the more interesting part for me would be how to get to the TIOT pointer at the beginning ... I used this to get the TIOT address, larl r2,extractArea extract (r2),fields=(tiot)Get tiot address lrl r2,@tiot using tiot1,r2 ... extractArea ds 0a @tiot ds a Note extract can return several different addresses, that's why I defined the area, then followed that with the individual fields I actually extracted. But Christopher Blaicher can find that address in two load instructions :-) To get to the TIOT use: PSATOLD-TCBTIO Donald Russell -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: where to get current module name and scanning tiot
Thanks Chris, Great info :-) In my case I'm looking at the TIOT before any DCBs have been opened, so even if FREE=CLOSE is specified, I'm still interested in the DD name Cheers, Donald Russell On Fri, Mar 7, 2014 at 6:57 AM, Blaicher, Christopher Y. cblaic...@syncsort.com wrote: To get to the current TCB use: PSATOLD-TCBRBP-RBCDE-CDENAME The other gets you to the first task. To get to the TIOT use: PSATOLD-TCBTIO A TIOELNGH of zero indicates end of list. If you use FREE=CLOSE, entries in the TIOT may be marked as inactive. See TIOESTTA/TIOSLTYP bit in IEFTIOT1 macro. Chris Blaicher Principal Software Engineer, Software Development Syncsort Incorporated 50 Tice Boulevard, Woodcliff Lake, NJ 07677 P: 201-930-8260 | M: 512-627-3803 E: cblaic...@syncsort.com -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Micheal Butz Sent: Thursday, March 06, 2014 11:28 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: where to get current module name and scanning tiot ASCBXTCB-TCBJSTCB-TCBRBP-RBCDE-CDENAME Sent from my iPhone On Mar 6, 2014, at 11:18 PM, Donald Russell russell@gmail.com wrote: I'm writing some assembler code and need to get the name of the currently running load module, but where is that? I thought it may have been in the tcb, but I don't see anything in ikjtcb that looks like a module name. :-( Maybe some other block pointed to from the tcb? I have no idea which control block has that, so I need some clues how to find my way to it and... I also need to look in the tiot to check which dd names are in the job step Am I reading the tiot macro correctly? There's a 1 byte length of each entry, and the tiot is as large as needed for all DD names in the job step? (I thought it was a fixed size, and then had some sort of extension block as needed, but I may be getting mixed up with JFCB or something) So, would this be correct? lrl r2,@tiot using tiot1,r2 tiotLoop ds 0h cli tioelngh,0 any more tiot entries? jeendTiotScango if none ... sr r1,r1 ic r1,tioelngh ar r2,r1 point to next item j tiotLoop endTiotScan ds 0h Thanks very much. it's been a good number of years since I did mvs programming at this level. Donald Russell -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ATTENTION: - The information contained in this message (including any files transmitted with this message) may contain proprietary, trade secret or other confidential and/or legally privileged information. Any pricing information contained in this message or in any files transmitted with this message is always confidential and cannot be shared with any third parties without prior written approval from Syncsort. This message is intended to be read only by the individual or entity to whom it is addressed or by their designee. If the reader of this message is not the intended recipient, you are on notice that any use, disclosure, copying or distribution of this message, in any form, is strictly prohibited. If you have received this message in error, please immediately notify the sender and/or Syncsort and destroy all copies of this message in your possession, custody or control. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Multiple timezones?
H, yes, I can run Linux, and in fact have Linux running in the same lpar already. I can just create a Linux Userid (no need for another linux instance) and set their time zone accordingly and use a cron tab to trigger the event. Brilliant! Thanks for the tip. :-) Donald Russell On Friday, August 9, 2013, Paul Gilmartin wrote: On Thu, 8 Aug 2013 22:23:23 -0700, Donald Russell wrote: zVM 6.1 (6.2 coming) The system runs with a UTC timezone, but it would be convenient if I had a userid that could run in a different time zone. UTC doesn't change with Daylight Saving Time, and I have a process I want to schedule at a specific time that is subject to DST changes. i.e. I want something to run at 3:00 AM Pacific Time, in summer and winter. If I can have a disconnected service machine running in the proper timezone, then a simple (k)wakeup exec can do what I need at the correct time. I thought TODENABLE might give me a clue, but I don't want a different time, I just want a different view of the same time. :-) Or, I just have to write my own little time calculator to make the adjustment... Not a difficult thing, but if there's a wheel I can use... It's all been done: http://www.iana.org/time-zones http://en.wikipedia.org/wiki/Tz_database IBM simply has a bad case of NIH. And someone points out that even IBM does it on AIX. Can your service machine run Linux? -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu javascript:; with the message: INFO IBM-MAIN -- Sent from iPhone Gmail Mobile -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Multiple timezones?
Thanks Paul, Yes, a quick experiment found that to be true. And my workaround was just what you did, use the at command. Too bad cron doesn't respect the tz of the cron tab owner But apparently there is something called fcron which does. But vanilla cron + at should work fine for what I need. Cheers, Donald Russell On Friday, August 9, 2013, Paul Gilmartin wrote: On Fri, 9 Aug 2013 01:35:52 -0700, Donald Russell wrote: H, yes, I can run Linux, and in fact have Linux running in the same lpar already. I can just create a Linux Userid (no need for another linux instance) and set their time zone accordingly and use a cron tab to trigger the event. Brilliant! Thanks for the tip. :-) One caution: Crontab always uses the system timezone setting; it's oblivious to the user's setting of TZ (unless Linux has an extension). The at command, however, is TZ-savvy, so I've circumvented by using crontab to trigger an event a few hours befor the intended time, which triggers an at command to trigger the event in the desired timezone. Possibly another caution: If the system is halted at the scheduled time, crontab simply skips the event until the next day, unlike WAKEUP which processes the event immediately upon restart. z/OS Unix System Services has some timezone smarts, but, unlike Linux, it is oblivious to legislative changes in timezone conventions. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu javascript:; with the message: INFO IBM-MAIN -- Sent from iPhone Gmail Mobile -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Multiple timezones?
zVM 6.1 (6.2 coming) The system runs with a UTC timezone, but it would be convenient if I had a userid that could run in a different time zone. UTC doesn't change with Daylight Saving Time, and I have a process I want to schedule at a specific time that is subject to DST changes. i.e. I want something to run at 3:00 AM Pacific Time, in summer and winter. If I can have a disconnected service machine running in the proper timezone, then a simple (k)wakeup exec can do what I need at the correct time. I thought TODENABLE might give me a clue, but I don't want a different time, I just want a different view of the same time. :-) Or, I just have to write my own little time calculator to make the adjustment... Not a difficult thing, but if there's a wheel I can use... Thanks, Donald Russell -- Sent from iPhone Gmail Mobile -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
