Re: Changing OMVS prompt to indicate SuperUser state?
export HOST="$(hostname -s)" # Change what the prompt looks like from '$' or '#' to be similar to 'myhost.abc.com:/u/user123 $ ' if [[ "${PS1}" == '# ' || "${PS1}" == '$ ' ]]; then export PSCH="${PS1}" typeset PS1='$HOST:${PWD} ${PSCH}' # typeset PS1="$HOST:\${PWD#$HOME/} $PSCH" fi Jonathan Eosze -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Dyck, Lionel B. (TRA) Sent: Monday, April 18, 2016 11:38 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: EXTERNAL: Changing OMVS prompt to indicate SuperUser state? Does anyone have an example of a .profile in which the prompt is changed so that it is different when in normal user state and in superuser state? Thanks in advance -- Lionel B. Dyck (Contractor) Mainframe Systems Programmer Enterprise Infrastructure Support (Station 200) (005OP6.3.10) VA OI Service Delivery & Engineering -- 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: EXTERNAL: Re: IBM z/OS Product Documentation 2016
Unfortunately, I have encountered the inability to access Knowledge Center on more than one occasion. Usually it was scheduled maintenance windows, but I expect the manuals to be available whenever I have an outage (sometimes caused by planned weekend and/or late-night maintenance) and want to research how to fix it. I would rather have the manuals not available due to IBM maintenance when I typically look at them, during the day, than during the night-time implementations that I am called to fix. Jonathan Eosze -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Paul Gilmartin Sent: Friday, March 25, 2016 11:29 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: EXTERNAL: Re: IBM z/OS Product Documentation 2016 On Fri, 25 Mar 2016 09:02:25 -0700, Tom Brennan wrote: >I recently discovered there are pdf manuals for Omegamon 5.1 but none >for the latest release 5.3. I hope IBM isn't planning on getting rid of >pdf manuals in favor of that web thing that I cannot use as effectively. > OTOH, I can get to "that web thing" anyplace, anytime. On the Gripping Hand, I have the (now outdated) PDFs on a flash drive in my pocket. (Need to see how well Spotlight indexes them.) Search on PUBLIBZ was magnificent but IBM may have grown weary of giving me free CPU cycles. -- 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: EXTERNAL: Re: IBM z/OS Product Documentation 2016
Agreed. When DVDs were available at conferences, we could easily copy it to a shared LAN drive, but now, manually clicking "save as" on 300+ PDFs (several products) is quite a pain. Jonathan Eosze | Sr Computer Sys Engr | IT Operations Mainframe Management 1 (IMS), Information Technology, USAA -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Munish Sharma Sent: Friday, March 25, 2016 1:39 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: EXTERNAL: Re: IBM z/OS Product Documentation 2016 Please enable download all for complete z/OS versions e.g. z/OS 2.1 --->> donwload all 2. Bring back bookshelf with download all as well. Believe me.. it helps alot -- 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: EXTERNAL: Re: rsync anyone?
I ported rsync-2.5.5 a few years ago: Below and attached is the diff from the original rsync-2.5.5.tar.gz. I also created /usr/local/bin/rsync.sh since we put rsync in a non-standard location: #!/bin/sh # This is a script to help provide a wrapper around rsync for usability reasons /usr/local/bin/rsync -e ssh --rsync-path=/usr/local/bin/rsync "$@" exit $? # example: # rsync.sh -av --delete --dry-run zxmvs01@z001:/area/host/lsm/products/ /area/host/lsm/products # rsync.sh -a --delete --stats --progress --one-file-system /u// /u/plc5611/tmp/ diff -cr rsync-2.5.5/Makefile.in rsync-2.5.5-new/Makefile.in *** rsync-2.5.5/Makefile.inMon Mar 25 05:36:56 2002 --- rsync-2.5.5-new/Makefile.in Wed May 15 11:32:50 2002 *** *** 24,35 .SUFFIXES: .c .o LIBOBJ=lib/fnmatch.o lib/compat.o lib/snprintf.o lib/mdfour.o \ ! lib/permstring.o \ ! @LIBOBJS@ ZLIBOBJ=zlib/deflate.o zlib/infblock.o zlib/infcodes.o zlib/inffast.o \ zlib/inflate.o zlib/inftrees.o zlib/infutil.o zlib/trees.o \ zlib/zutil.o zlib/adler32.o ! OBJS1=rsync.o generator.o receiver.o cleanup.o sender.o exclude.o util.o main.o checksum.o match.o syscall.o log.o backup.o OBJS2=options.o flist.o io.o compat.o hlink.o token.o uidlist.o socket.o fileio.o batch.o \ clientname.o DAEMON_OBJ = params.o loadparm.o clientserver.o access.o connection.o authenticate.o --- 24,34 .SUFFIXES: .c .o LIBOBJ=lib/fnmatch.o lib/compat.o lib/snprintf.o lib/mdfour.o \ !lib/permstring.o @LIBOBJS@ ZLIBOBJ=zlib/deflate.o zlib/infblock.o zlib/infcodes.o zlib/inffast.o \ zlib/inflate.o zlib/inftrees.o zlib/infutil.o zlib/trees.o \ zlib/zutil.o zlib/adler32.o ! OBJS1=rsync.o generator.o receiver.o cleanup.o sender.o exclude.o util.o main.o checksum.o match.o syscall.o log.o backup.o cpconv.o OBJS2=options.o flist.o io.o compat.o hlink.o token.o uidlist.o socket.o fileio.o batch.o \ clientname.o DAEMON_OBJ = params.o loadparm.o clientserver.o access.o connection.o authenticate.o *** *** 45,51 # note that the -I. is needed to handle config.h when using VPATH .c.o: @OBJ_SAVE@ ! $(CC) -I. -I$(srcdir) $(CFLAGS) -c $< @CC_SHOBJ_FLAG@ @OBJ_RESTORE@ all: rsync --- 45,51 # note that the -I. is needed to handle config.h when using VPATH .c.o: @OBJ_SAVE@ ! $(CC) -I. -I$(srcdir) $(CFLAGS) @CC_SHOBJ_FLAG@ -c $< @OBJ_RESTORE@ all: rsync diff -cr rsync-2.5.5/lib/getaddrinfo.c rsync-2.5.5-new/lib/getaddrinfo.c *** rsync-2.5.5/lib/getaddrinfo.c Fri Dec 14 06:33:12 2001 --- rsync-2.5.5-new/lib/getaddrinfo.c Tue May 14 14:12:24 2002 *** *** 259,266 --- 259,278 /* error check for hints */ if (hints->ai_addrlen || hints->ai_canonname || hints->ai_addr || hints->ai_next) + #if defined(__MVS__) + /* hints seem to be unknown to OS390 Open Edition, use EAI_MAX + */ + ERR(EAI_MAX); /* xxx */ + #else ERR(EAI_BADHINTS); /* xxx */ + #endif + #if defined(__MVS__) + /* when compiling on OS390 Open Edition AI_MASK appears to be */ + /* undefined, include expansion literally here */ + if (hints->ai_flags & ~(AI_PASSIVE | AI_CANONNAME | AI_NUMERICHOST)) + #else if (hints->ai_flags & ~AI_MASK) + #endif ERR(EAI_BADFLAGS); switch (hints->ai_family) { case PF_UNSPEC: *** *** 294,306 --- 306,330 case SOCK_DGRAM: if (pai->ai_protocol != IPPROTO_UDP && pai->ai_protocol != ANY) + #if defined(__MVS__) + /* hints seem to be unknown to OS390 Open Edition, use + EAI_MAX */ + ERR(EAI_MAX); /*xxx*/ + #else ERR(EAI_BADHINTS); /*xxx*/ + #endif pai->ai_protocol = IPPROTO_UDP; break; case SOCK_STREAM: if (pai->ai_protocol != IPPROTO_TCP && pai->ai_protocol != ANY) + #if defined(__MVS__) + /* hints seem to be unknown to OS390 Open Edition, use + EAI_MAX */ + ERR(EAI_MAX); /*xxx*/ + #else ERR(EAI_BADHINTS); /*xxx*/ + #endif pai->ai_protocol = IPPROTO_TCP; break; default: *** *** 350,356 --- 374,386 pai->ai_socktype =
Re: Mainframe hyperlink
Assuming that you are talking about z/OS, the old HTTP server based on Domino had a facility that would handle PS, PDS and PDSE: the GWAPIS MVSDS DLL Service. Unfortunately, the new Apache based HTTP server doesn't have it, so we've been holding off on converting. More information can be found at http://www-01.ibm.com/support/knowledgecenter/#!/SSLTBW_1.12.0/com.ibm.zos.r12.dgwa400/imwziu181527.htm. Snippet from our /etc/httpd.conf: #4. EXAMPLE URL's #= #Example URL's containing this type of naming would be: # # http://www.mvs.tcp.ibm.com/MVSDS/'WEBSRV.PAGES.HTML.HOME' # http://www.mvs.tcp.ibm.com/MVSDS/DD:PAGES(OTHERPAG) # http://www.mvs.tcp.ibm.com/MVSDS/MYPAGES.IMAGES.GIF(NATURE) # #In these examples, MVSDS is used as the key. The examples represent: # - a (an?) FQN # - a JCL DD reference (to a PDS, whose member OTHERPAG is # to be retrieved), and # - a PQN to which the MVS user ID will be prepended Jonathan Eosze | Sr Computer Sys Engr | IT Operations Mainframe Management 1 (IMS), Information Technology, USAA -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Staller, Allan Sent: Friday, August 28, 2015 8:14 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: EXTERNAL: Re: Mainframe hyperlink There is a lot of infrastructure to put in place before that can happen, but given an HTTP server on the mainframe, I would expect this to be possible. As a minimum, NFS would need to be installed/updated, not to mention security upgrades, OMVS configuration changes,... Good Luck! snip Hi, we had a query from a user we don't think is possible but posting here just in case. The user is asking 'if there is a way to code a 'hyperlink' type entry on the mainframe to be able to click to a share drive or server' /snip -- 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: EXTERNAL: Re: Mainframe hyperlink
And the comment about a share drive makes me think of a Windows desktop mapping a shared drive, which would imply SMB or SAMBA--or z/OS DFS (Distributed File Service). http://www-01.ibm.com/support/knowledgecenter/#!/SSLTBW_2.1.0/com.ibm.zos.v2r1.ioe/ioe.htm However, our experience has been poor performance compared to almost anything, including NFS and a 15+ year old port of SAMBA, and unable to support the changing of the owning system of a file system. Though that is supported, we never attempted to use it for access to datasets. Jonathan Eosze | Sr Computer Sys Engr | IT Operations Mainframe Management 1 (IMS), Information Technology, USAA -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Elardus Engelbrecht Sent: Friday, August 28, 2015 8:59 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: EXTERNAL: Re: Mainframe hyperlink Eamon C wrote: The user is asking 'if there is a way to code a 'hyperlink' type entry on the mainframe to be able to click to a share drive or server' In theory yes! But, as others said, you'll need a lot of things to setup in the first place. First, you'll have to explain the terms you use. 'share drive' and 'server' for example are not really the right terms. You said it is z/OS, Ok, I have a lot of questions... What will you then use to drive a web server? HTTP server? CICS? DB2? etc.? As Allan said, what about NFS? How will you setup your OMVS? What will you use for TCP/IP? Security? RACF? Firewalls? Oh, what will you use to see a 'drive'? Do you want see a device? On z/OS, the general users don't see 'drives', but on OMVS, yes, but then with mountable paths+folders depending on setup. Or do you want to open files? Others suggested about using files via various ways... And lastly... what language or utility will you use to serve up those pages and accept the 'clicks'? Finally, what will you to limit the availability of those pages containing those links? About 'server'. This is way too ambiguous. You'll have to decide on what database you want to work on and then with right security setup the 'surfer' can perhaps click on something as long the application can handle the request. Lots of work, yes... 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: Exporting Excel to Dataset
One option would be to use the open source POI libraries from Java, called from COBOL via JNI. Warning, JNI is not for the faint of heart. Jonathan Eosze | Sr Computer Sys Engr | IT Operations Mainframe Management 1 (IMS), Information Technology, USAA -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Ron Thomas Sent: Monday, August 03, 2015 12:20 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: EXTERNAL: Exporting Excel to Dataset We have a requirement that looks for exporting an Excel template with data in a tabular format from an FTP folder location to a mainframe PDS which later needs to be accessed via COBOL for some business processing logic. We know that this works fine if the input Excel file is in .CSV format. What we are looking for is, if anyone is aware of any such functionalities where we can accept and export the Excel template as such to a PDS that is readable by COBOL without being converted to a .CSV file? Thanks Ron T -- 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: ENQ for the life of the job
MVS Solutions' Thruput Manager product is able to dynamically add limiting agents to JCL based on a set of rules, so that might be worth looking at. Jonathan Eosze | Sr Computer Sys Engr | IT Operations Mainframe Management 1 (IMS), Information Technology, USAA -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of J O Skip Robinson Sent: Monday, April 20, 2015 11:25 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: EXTERNAL: Re: ENQ for the life of the job OP is clear about not wanting to change JCL. I've never tried anything like this, but maybe code in a system exit would work. I'm thinking of either JES or SMF, both of which have exit points at job initialization and termination. One issue not mentioned so far is how any transparent mechanism is supposed to know which 'program name' to enqueue on. I assume that varies by job. Also, could a particular job execute more than one such program and therefore need multiple enqueues? Just another consideration... . . . J.O.Skip Robinson Southern California Edison Company Electric Dragon Team Paddler SHARE MVS Program Co-Manager 626-302-7535 Office 323-715-0595 Mobile jo.skip.robin...@sce.com -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Staller, Allan Sent: Monday, April 20, 2015 8:57 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: ENQ for the life of the job As previously suggested, initial IEFBR14 step (e.g.) //step1 exec pgm=iefbr14 //dd1dd dsn=hlq.program,disp=(mod,pass),space=(trk,1,1),unit=sysda And simply never reference hlq.program in the jobstream. This will prevent multiple concurrent processes on the same program and is a lot less work than some of the other suggestions in this thread. HTH, snip The job is performing a change management system operation (moving a new program version to production, saving previous generations, providing for possible fallback, etc.). The operation for various reasons must be performed in several job steps. We want to ENQ on the name of the program being handled to prevent other operations or changes being made to that program in parallel. Of course the ENQ must remain in effect for the duration of the entire operation. + On Mon, Apr 20, 2015 at 6:19 PM, Jousma, David david.jou...@53.com wrote: Maybe if you can explain in more detail what situation you are trying to solve for would help? _ Dave Jousma Assistant Vice President, Mainframe Engineering david.jou...@53.com 1830 East Paris, Grand Rapids, MI 49546 MD RSCB2H p 616.653.8429 f 616.653.2717 /snip -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Steff Gladstone Sent: Monday, April 20, 2015 11:18 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: ENQ for the life of the job I suppose a final job-step to do the DEQ with COND=EVEN would not always do the trick. As I recall there are some types of abends that flush the job including steps with COND=EVEN, right? On Mon, Apr 20, 2015 at 6:09 PM, John McKown john.archie.mck...@gmail.com wrote: On Mon, Apr 20, 2015 at 9:41 AM, Steff Gladstone steff.gladst...@gmail.com wrote: The ENQ has to be transparent to the JCL. Could I dynamically allocate a dataset with DISP=(OLD,PASS)? As I recall the dynamic allocation does not permit the use of PASS. Hum, I'm going to go way out on a limb and start sawing. grin/ I wonder if it would be possible to do a directed ENQ of a SYSDSN to the initiator TCB and then modify the SWA to generate the internal information for a DD and place that as if it had been in a DD in the JCL. I am likely not saying that very well. But I'm thinking that products like CA-11 do this sort of thing for restart (in order to change GDG generation numbers). If this were possible, then perhaps the initiator would do the DEQ at end of job. Perhaps Chris, or another ISV person, would know. On Mon, Apr 20, 2015 at 5:30 PM, Blaicher, Christopher Y. cblaic...@syncsort.com wrote: I guess you could do that, assign the initiator TCB to the ENQ, but what happens if the job abends before the step you do the DEQ in? I think this will work - If the purpose is to prevent two similar processes, then why not use a common data set and allocate it as DISP=(OLD,PASS). That way the ENQ on the data set will last for the duration of the job, and if it dies early the ENQ automatically goes away. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe /